diff options
author | andy <andrew.m.goth@gmail.com> | 2015-07-14 21:38:05 (GMT) |
---|---|---|
committer | andy <andrew.m.goth@gmail.com> | 2015-07-14 21:38:05 (GMT) |
commit | eb2fec43a3f3ceeb627cf925fbe35626f68fa91f (patch) | |
tree | 1ee30269b81fbf70f05de02fbd1f9d489cfde6d5 | |
parent | 54973b1d25bb129ab2ef8b3b0082175e5f8eeb89 (diff) | |
download | tcl-eb2fec43a3f3ceeb627cf925fbe35626f68fa91f.zip tcl-eb2fec43a3f3ceeb627cf925fbe35626f68fa91f.tar.gz tcl-eb2fec43a3f3ceeb627cf925fbe35626f68fa91f.tar.bz2 |
Spell out [info exists] in example code for [exit] command.
-rw-r--r-- | doc/exit.n | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -35,7 +35,7 @@ proc main {} { if {[catch {main} msg options]} { puts stderr "unexpected script error: $msg" - if {[info exist env(DEBUG)]} { + if {[info exists env(DEBUG)]} { puts stderr "---- BEGIN TRACE ----" puts stderr [dict get $options -errorinfo] puts stderr "---- END TRACE ----" |