summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2013-11-20 11:20:32 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2013-11-20 11:20:32 (GMT)
commitdf9709eef5f83bb6070ddb864f042cf9daff7d96 (patch)
treec7728afbf709340e07aaabd07158c17449b9b057 /generic
parent292a07fb1ed3636070430bbcda1f350629eba5e2 (diff)
downloadtcl-df9709eef5f83bb6070ddb864f042cf9daff7d96.zip
tcl-df9709eef5f83bb6070ddb864f042cf9daff7d96.tar.gz
tcl-df9709eef5f83bb6070ddb864f042cf9daff7d96.tar.bz2
Bug Fix: EnvTraceProc() MUST always return NULL to indicate success.
Diffstat (limited to 'generic')
-rw-r--r--generic/tclEnv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclEnv.c b/generic/tclEnv.c
index 6a21947..7c49d44 100644
--- a/generic/tclEnv.c
+++ b/generic/tclEnv.c
@@ -614,7 +614,7 @@ EnvTraceProc(
const char *value = TclGetEnv(name2, &valueString);
if (value == NULL) {
- return (char *) "no such variable";
+ return NULL;
}
Tcl_SetVar2(interp, name1, name2, value, 0);
Tcl_DStringFree(&valueString);