From c22de5144f416a709ff386b57b1484fa09ec5ed1 Mon Sep 17 00:00:00 2001 From: dgp Date: Mon, 28 Aug 2006 13:13:56 +0000 Subject: undo last commit. --- ChangeLog | 4 ---- generic/tclNamesp.c | 4 ++-- 2 files changed, 2 insertions(+), 6 deletions(-) diff --git a/ChangeLog b/ChangeLog index 888cb70..14f1f17 100644 --- a/ChangeLog +++ b/ChangeLog @@ -3,10 +3,6 @@ * generic/tclClock.c (ClockClicksObjCmd): Fix nested macro breakage with TCL_MEM_DEBUG enabled. [Bug 1547662] - * generic/tclNamesp.c (NamespaceUpvarCmd): Fix panic with TCL_MEM_DEBUG - enabled caused by incorrect usage of TclFormatObj (missing trailing - NULL argument). [Bug 1547681] - 2006-08-26 Miguel Sofer * doc/namespace.n: diff --git a/generic/tclNamesp.c b/generic/tclNamesp.c index f33358d..74d7f41 100644 --- a/generic/tclNamesp.c +++ b/generic/tclNamesp.c @@ -22,7 +22,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclNamesp.c,v 1.99 2006/08/28 04:13:32 mistachkin Exp $ + * RCS: @(#) $Id: tclNamesp.c,v 1.100 2006/08/28 13:13:57 dgp Exp $ */ #include "tclInt.h" @@ -4608,7 +4608,7 @@ NamespaceUpvarCmd( Tcl_Obj *resPtr; TclNewObj(resPtr); - TclFormatObj(NULL, resPtr, "namespace \"%s\" does not exist", objv[2], NULL); + TclFormatObj(NULL, resPtr, "namespace \"%s\" does not exist", objv[2]); Tcl_SetObjResult(interp, resPtr); return TCL_ERROR; } -- cgit v0.12