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
This commit is contained in:
parent
98687ed638
commit
10215cdd1e
1 changed files with 1 additions and 1 deletions
|
@ -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;
|
||||
|
|
Loading…
Reference in a new issue