From 10215cdd1ebead5c0f6c88dc105d03e9cfe365c0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dag-Erling=20Sm=C3=B8rgrav?= Date: Sat, 31 Mar 2012 21:15:44 +0000 Subject: [PATCH] Only pull up punctuation which is followed by whitespace. git-svn-id: svn+ssh://svn.openpam.org/svn/openpam/trunk@541 185d5e19-27fe-0310-9dcf-9bff6b9f3609 --- misc/gendoc.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/misc/gendoc.pl b/misc/gendoc.pl index f70aee3..83e1027 100644 --- a/misc/gendoc.pl +++ b/misc/gendoc.pl @@ -311,7 +311,7 @@ sub parse_source($) { $inliteral = 0; } $man =~ s/\%/\\&\%/gs; - $man =~ s/(\n\.[A-Z][a-z] [\w ]+)\n([\.,:;-]\S*)\s*/$1 $2\n/gs; + $man =~ s/(\n\.[A-Z][a-z] [\w ]+)\n([.,:;-])\s+/$1 $2\n/gs; $man =~ s/\s*$/\n/gm; $man =~ s/\n+/\n/gs; $man =~ s/\0//gs;