X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/dd7a38147179a59bff9dffd824b265862aa1a59e..19a7752021249eb8984e523fd6ed5a3730dc9be7:/mdwn2man diff --git a/mdwn2man b/mdwn2man index 8c70c87c1..d3db43165 100755 --- a/mdwn2man +++ b/mdwn2man @@ -7,9 +7,13 @@ my $section=shift; print ".TH $prog $section\n"; while (<>) { - s{(\\?)\[\[([^\s\]]+)\]\]}{$1 ? "[[$2]]" : $2}eg; - s/^#\s/.SH /; + s{(\\?)\[\[([^\s\|\]]+)(\|[^\s\]]+)?\]\]}{$1 ? "[[$2]]" : $2}eg; + if (/^#\s/) { + s/^#\s/.SH /; + <>; # blank; + } s/^\s+//; + s/-/\\-/g; s/^Warning:.*//g; s/^$/.PP\n/; s/\`//g;