improved period escape

master
Joey Hess 2008-05-30 18:01:16 -04:00
parent 878bfe008c
commit 4045ee01e5
1 changed files with 1 additions and 1 deletions

View File

@ -9,7 +9,7 @@ print ".TH $prog $section\n";
while (<>) { while (<>) {
s{(\\?)\[\[([^\s\|\]]+)(\|[^\s\]]+)?\]\]}{$1 ? "[[$2]]" : $2}eg; s{(\\?)\[\[([^\s\|\]]+)(\|[^\s\]]+)?\]\]}{$1 ? "[[$2]]" : $2}eg;
s/\`//g; s/\`//g;
s/^\./\\./g; s/^\./\\&./g;
if (/^#\s/) { if (/^#\s/) {
s/^#\s/.SH /; s/^#\s/.SH /;
<>; # blank; <>; # blank;