diff options
| author | hobbs <hobbs> | 2008-01-05 00:27:01 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 2008-01-05 00:27:01 (GMT) |
| commit | 9d71fec4478107420e9e1d27660879c735640be2 (patch) | |
| tree | 9c40d8e11440c28031c42877128fa7dbb236d7ef | |
| parent | f336ac585ecc2f6c1ca5a67611bedbaa11a9c5df (diff) | |
| download | tcl-9d71fec4478107420e9e1d27660879c735640be2.zip tcl-9d71fec4478107420e9e1d27660879c735640be2.tar.gz tcl-9d71fec4478107420e9e1d27660879c735640be2.tar.bz2 | |
* tools/tcltk-man2html.tcl (make-man-pages): make man page title
use more specific info on lhs to improve tabbed browser view titles.
| -rw-r--r-- | ChangeLog | 5 | ||||
| -rwxr-xr-x | tools/tcltk-man2html.tcl | 2 |
2 files changed, 6 insertions, 1 deletions
@@ -1,3 +1,8 @@ +2008-01-04 Jeff Hobbs <jeffh@ActiveState.com> + + * tools/tcltk-man2html.tcl (make-man-pages): make man page title + use more specific info on lhs to improve tabbed browser view titles. + 2008-01-02 Donal K. Fellows <dkf@users.sf.net> * doc/binary.n: Fixed documentation bug reported on tcl-core, and diff --git a/tools/tcltk-man2html.tcl b/tools/tcltk-man2html.tcl index c12b643..21f70d4 100755 --- a/tools/tcltk-man2html.tcl +++ b/tools/tcltk-man2html.tcl @@ -1731,7 +1731,7 @@ proc make-man-pages {html args} { set manual($manual(name)-title) \ "[lrange $rest 1 end] [lindex $rest 0] manual page" } elseif {[next-op-is .TH rest]} { - set manual($manual(name)-title) "[lrange $rest 4 end] - [lindex $rest 0] manual page" + set manual($manual(name)-title) "[lindex $rest 0] manual page - [lrange $rest 4 end]" } else { set haserror 1 manerror "no .HS or .TH record found" |