diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-01 15:15:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-09-01 15:15:46 (GMT) |
| commit | 67acc8945524908e6b8e9e1f8b1f949d3a146e11 (patch) | |
| tree | ce07568e15418586794d34eedbaa04e6f1db2dc9 /tools/man2help.tcl | |
| parent | 573f9fd80810dede88587f8ec61fb5cbb4a100b8 (diff) | |
| download | tcl-67acc8945524908e6b8e9e1f8b1f949d3a146e11.zip tcl-67acc8945524908e6b8e9e1f8b1f949d3a146e11.tar.gz tcl-67acc8945524908e6b8e9e1f8b1f949d3a146e11.tar.bz2 | |
Whitespace reduction in Tcl scripts. No functional change.
Diffstat (limited to 'tools/man2help.tcl')
| -rw-r--r-- | tools/man2help.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tools/man2help.tcl b/tools/man2help.tcl index 018fa84..ca29226 100644 --- a/tools/man2help.tcl +++ b/tools/man2help.tcl @@ -36,7 +36,7 @@ proc generateContents {basename version files} { set lastTopic {} foreach topic [getTopics $package $section] { if {[string compare $lastTopic $topic]} { - set id $topics($package,$section,$topic) + set id $topics($package,$section,$topic) puts $fd "2 $topic=$id" set lastTopic $topic } |