X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/773731743df52d2ef2d8ce93c095be981bb9bfc8..e6425c75c095ee64a8d7c566f49fe62ded511ebe:/mdwn2man diff --git a/mdwn2man b/mdwn2man index 57c41c865..d3db43165 100755 --- a/mdwn2man +++ b/mdwn2man @@ -1,12 +1,19 @@ #!/usr/bin/perl # Warning: hack -print ".TH ikiwiki 1\n"; +my $prog=shift; +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;