diff options
author | hobbs <hobbs> | 2006-10-31 01:05:24 (GMT) |
---|---|---|
committer | hobbs <hobbs> | 2006-10-31 01:05:24 (GMT) |
commit | bdf25bdf70ec1d2f6dddeb07719d5b50ee2a5f91 (patch) | |
tree | 43f8ee0bc9fde0ee7478347fd6ea97c5235e1389 /tools | |
parent | 14e06bc0da3f3fc9c51f0905122c160e0bec7b14 (diff) | |
download | tcl-bdf25bdf70ec1d2f6dddeb07719d5b50ee2a5f91.zip tcl-bdf25bdf70ec1d2f6dddeb07719d5b50ee2a5f91.tar.gz tcl-bdf25bdf70ec1d2f6dddeb07719d5b50ee2a5f91.tar.bz2 |
* tools/tcltk-man2html.tcl (option-toc): handle any kind of
options defined toc section (needed for ttk docs)
Diffstat (limited to 'tools')
-rwxr-xr-x | tools/tcltk-man2html.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
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 |