From: Harlan Stenn Date: Sun, 16 Dec 2012 10:32:46 +0000 (+0000) Subject: Update documentation templates and definitions X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=4c2877221d64a1b663bbbcbc9afd6f0353083d78;p=thirdparty%2Fntp.git Update documentation templates and definitions bk: 50cda34eGR-WcY77EXDjHoxM2PEyUw --- diff --git a/sntp/ag-tpl/mdoc2texi b/sntp/ag-tpl/mdoc2texi index 55377e5456..99ab8cd7c9 100755 --- a/sntp/ag-tpl/mdoc2texi +++ b/sntp/ag-tpl/mdoc2texi @@ -9,9 +9,9 @@ my ($count,$tableitemcount); my ($progName); my (@words, $retval,$columnline); my ($extArg); -my (%anchors, $aCount); +my (%anchor, $aCount); -$acount = 0; +$aCount = 0; $optlist = 0; ### 1 = bullet, 2 = enum, 3 = tag, 4 = item/column $oldoptlist = 0; @@ -393,12 +393,29 @@ sub Handle_Op # but we can handle that with separate Handle_Oo and Handle_Oc # routines. + my ($op); + print '['; + $op = 1; do { - if + if ($op && $words[0] =~ /^(Ar|Cm|Fl|Ic)$/) + { + $_ = shift @words; + Handle_ArCmFlIc(); + } + elsif ($words[0] =~ /^[[:punct:]]$/) + { + print ']' if ($op); + $op = 0; + print shift @words; + } + else + { + print shift @words; + } } while (@words > 0); - print ']'; - print "\n"; + print ']' if ($op); + print "\n"; # HMS: We may not want these in many places... } sub Handle_Pa