From bdf25bdf70ec1d2f6dddeb07719d5b50ee2a5f91 Mon Sep 17 00:00:00 2001 From: hobbs Date: Tue, 31 Oct 2006 01:05:24 +0000 Subject: * tools/tcltk-man2html.tcl (option-toc): handle any kind of options defined toc section (needed for ttk docs) --- ChangeLog | 5 +++++ tools/tcltk-man2html.tcl | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 30b1666..94103f2 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2006-10-30 Jeff Hobbs + + * tools/tcltk-man2html.tcl (option-toc): handle any kind of + options defined toc section (needed for ttk docs) + 2006-10-30 Miguel Sofer * generic/tclBasic.c (TEOVI): insured that the interp's callObjc/v diff --git a/tools/tcltk-man2html.tcl b/tools/tcltk-man2html.tcl index 11e54c7..d0e126c 100755 --- a/tools/tcltk-man2html.tcl +++ b/tools/tcltk-man2html.tcl @@ -393,7 +393,7 @@ proc long-toc {text} { } proc option-toc {name class switch} { global manual - if {[string equal $manual(section) "WIDGET-SPECIFIC OPTIONS"]} { + if {[string match "*OPTIONS" $manual(section)]} { # link the defined option into the long table of contents set link [long-toc "$switch, $name, $class"] regsub -- "$switch, $name, $class" $link "$switch" link -- cgit v0.12