diff options
author | das <das> | 2004-11-12 09:01:22 (GMT) |
---|---|---|
committer | das <das> | 2004-11-12 09:01:22 (GMT) |
commit | 32881d222bd536bdbf64ad2faf3deb6bb1f34aca (patch) | |
tree | 1c6463dd66e2fd05e6f2a96516a458e646c8d56c /tools | |
parent | 0b20aa92ea2230773776adc69fe0a473b7bfef88 (diff) | |
download | tcl-32881d222bd536bdbf64ad2faf3deb6bb1f34aca.zip tcl-32881d222bd536bdbf64ad2faf3deb6bb1f34aca.tar.gz tcl-32881d222bd536bdbf64ad2faf3deb6bb1f34aca.tar.bz2 |
* doc/CrtChannel.3:
* doc/Interp.3:
* doc/Limit.3:
* doc/binary.n:
* doc/dict.n:
* doc/tm.n:
* doc/upvar.n: fixed *roff errors uncovered by running 'make html'.
* tools/tcltk-man2html.tcl: added faked support for bullet point
lists, i.e. *nroff ".IP \(bu" syntax.
Diffstat (limited to 'tools')
-rwxr-xr-x | tools/tcltk-man2html.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tools/tcltk-man2html.tcl b/tools/tcltk-man2html.tcl index 7190b1d..b9c8280 100755 --- a/tools/tcltk-man2html.tcl +++ b/tools/tcltk-man2html.tcl @@ -230,6 +230,7 @@ proc process-text {text} { {\(+-} {±} \ {\fP} {\fR} \ {\.} . \ + {\(bu} {•} \ ] $text] regsub -all {\\o'o\^'} $text {\ô} text; # o-circumflex in re_syntax.n regsub -all {\\-\\\|\\-} $text -- text; # two hyphens @@ -558,6 +559,8 @@ proc output-IP-list {context code rest} { if {[string equal $manual(section) "ARGUMENTS"] || \ [regexp {^\[\d+\]$} $rest]} { man-puts "$para<DT>$rest<DD>" + } elseif {[string equal {•} $rest]} { + man-puts "$para<DT><DD>$rest " } else { man-puts "$para<DT>[long-toc $rest]<DD>" } |