diff options
author | andrew.m.goth@gmail.com <andy> | 2015-07-14 21:38:05 (GMT) |
---|---|---|
committer | andrew.m.goth@gmail.com <andy> | 2015-07-14 21:38:05 (GMT) |
commit | 2d0b25b201c857077cf27ac9b7136c5a4404a395 (patch) | |
tree | 1ee30269b81fbf70f05de02fbd1f9d489cfde6d5 | |
parent | a56e34c59b0ab5471f23cf30109e3aa17a7b5de9 (diff) | |
download | tcl-2d0b25b201c857077cf27ac9b7136c5a4404a395.zip tcl-2d0b25b201c857077cf27ac9b7136c5a4404a395.tar.gz tcl-2d0b25b201c857077cf27ac9b7136c5a4404a395.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 ----" |