summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2007-08-01 12:09:02 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2007-08-01 12:09:02 (GMT)
commit24d28892567192aedf221dde8efe1939487fd017 (patch)
treece546534c024d201fb99411e9c494f039221ef1d
parentc78aef8e3103f916ede55e36edd8f5fb876ab0f6 (diff)
downloadtcl-24d28892567192aedf221dde8efe1939487fd017.zip
tcl-24d28892567192aedf221dde8efe1939487fd017.tar.gz
tcl-24d28892567192aedf221dde8efe1939487fd017.tar.bz2
* generic/tclVar.c (TclCleanupVar): fix [Bug 1765225], thx Larry
Virden.
-rw-r--r--ChangeLog5
-rw-r--r--generic/tclVar.c4
2 files changed, 7 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog
index cc1a8f7..7a824b6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-01 Miguel Sofer <msofer@users.sf.net>
+
+ * generic/tclVar.c (TclCleanupVar): fix [Bug 1765225], thx Larry
+ Virden.
+
2007-07-31 Miguel Sofer <msofer@users.sf.net>
* doc/Hash.3:
diff --git a/generic/tclVar.c b/generic/tclVar.c
index d032cef..967f539 100644
--- a/generic/tclVar.c
+++ b/generic/tclVar.c
@@ -16,7 +16,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclVar.c,v 1.145 2007/07/31 17:03:41 msofer Exp $
+ * RCS: @(#) $Id: tclVar.c,v 1.146 2007/08/01 12:09:04 msofer Exp $
*/
#include "tclInt.h"
@@ -286,7 +286,7 @@ TclCleanupVar(
Var *arrayPtr) /* Array that contains the variable, or NULL
* if this variable isn't an array element. */
{
- return CleanupVar(varPtr, arrayPtr);
+ CleanupVar(varPtr, arrayPtr);
}