summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorstanton <stanton>1998-07-31 15:54:26 (GMT)
committerstanton <stanton>1998-07-31 15:54:26 (GMT)
commitc9a810f7641eacae2161c970f4679a52a48e469f (patch)
treeb63666e6ef0ba3f672a8f318a52ee2ad9304571a
parentc2c520dcfce0c32939fcae1f7ab46a93c59dd84b (diff)
downloadtcl-c9a810f7641eacae2161c970f4679a52a48e469f.zip
tcl-c9a810f7641eacae2161c970f4679a52a48e469f.tar.gz
tcl-c9a810f7641eacae2161c970f4679a52a48e469f.tar.bz2
remove temporary variables
-rw-r--r--library/init.tcl6
1 files changed, 6 insertions, 0 deletions
diff --git a/library/init.tcl b/library/init.tcl
index 3495a07..de9c30e 100644
--- a/library/init.tcl
+++ b/library/init.tcl
@@ -62,6 +62,12 @@ if {(![interp issafe]) && ($tcl_platform(platform) == "windows")} {
}
}
}
+ if {[info exists p]} {
+ unset p
+ }
+ if {[info exists u]} {
+ unset u
+ }
if {![info exists env(COMSPEC)]} {
if {$tcl_platform(os) == {Windows NT}} {
set env(COMSPEC) cmd.exe