diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-11-04 15:52:17 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-11-04 15:52:17 (GMT) |
| commit | fbc3a63f6c2f807d2181059be4b58e68e1791f00 (patch) | |
| tree | 41598aab42e4b2e8638fd08568b6203c6404ca91 /tools/tcltk-man2html-utils.tcl | |
| parent | f2262dec1cdcdbae633751f0c986e4bfff4035db (diff) | |
| parent | 18a2ebc51dc9923f5cd946614aa87f4293ab40bd (diff) | |
| download | tcl-fbc3a63f6c2f807d2181059be4b58e68e1791f00.zip tcl-fbc3a63f6c2f807d2181059be4b58e68e1791f00.tar.gz tcl-fbc3a63f6c2f807d2181059be4b58e68e1791f00.tar.bz2 | |
merge trunk
Diffstat (limited to 'tools/tcltk-man2html-utils.tcl')
| -rw-r--r-- | tools/tcltk-man2html-utils.tcl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tools/tcltk-man2html-utils.tcl b/tools/tcltk-man2html-utils.tcl index 8fd1245..9052049 100644 --- a/tools/tcltk-man2html-utils.tcl +++ b/tools/tcltk-man2html-utils.tcl @@ -57,9 +57,14 @@ proc copyright {copyright {level {}}} { } proc copyout {copyrights {level {}}} { + set count 0 set out "<div class=\"copy\">" foreach c $copyrights { + if {$count > 0} { + append out <BR> + } append out "[copyright $c $level]\n" + incr count } append out "</div>" return $out |