summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rwxr-xr-xtools/tcltk-man2html.tcl2
2 files changed, 6 insertions, 1 deletions
diff --git a/ChangeLog b/ChangeLog
index 877d56e..6449c96 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -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"