fix escaping of indented dot

master
Joey Hess 2010-03-12 15:09:33 -05:00
parent edec9514f4
commit 0daa7a122f
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/^\s*\./\\&./g;
if (/^#\s/) { if (/^#\s/) {
s/^#\s/.SH /; s/^#\s/.SH /;
<>; # blank; <>; # blank;