# | Line 144 | Line 144 | proc helpopen fname { # open the named help file | |
---|---|---|
144 | } | |
145 | } | |
146 | if {! [catch {set fi [open $ifile w]}]} { | |
147 | + | puts $fi "# This is an automatically created index\ |
148 | + | file -- DO NOT EDIT!" |
149 | writevars $fi helpindex | |
150 | close $fi | |
151 | catch {exec chmod 666 $ifile} |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |