summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--generic/tclEnv.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/generic/tclEnv.c b/generic/tclEnv.c
index 7c49d44..8f51c1b 100644
--- a/generic/tclEnv.c
+++ b/generic/tclEnv.c
@@ -614,6 +614,7 @@ EnvTraceProc(
const char *value = TclGetEnv(name2, &valueString);
if (value == NULL) {
+ Tcl_UnsetVar2(interp, name1, name2, 0);
return NULL;
}
Tcl_SetVar2(interp, name1, name2, value, 0);