From 592bc82c4fad3d71658ac5f43bcdb016fe2016c1 Mon Sep 17 00:00:00 2001
From: dgp <dgp@noemail.net>
Date: Wed, 21 Nov 2001 19:53:39 +0000
Subject: 	another fix for test trace-8.8

FossilOrigin-Name: e1acd2856ec392959b5e30457f35db116b9759ea
---
 tests/trace.test | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tests/trace.test b/tests/trace.test
index d883008..b82b399 100644
--- a/tests/trace.test
+++ b/tests/trace.test
@@ -11,7 +11,7 @@
 # See the file "license.terms" for information on usage and redistribution
 # of this file, and for a DISCLAIMER OF ALL WARRANTIES.
 #
-# RCS: @(#) $Id: trace.test,v 1.13 2001/11/21 17:37:49 dgp Exp $
+# RCS: @(#) $Id: trace.test,v 1.14 2001/11/21 19:53:40 dgp Exp $
 
 if {[lsearch [namespace children] ::tcltest] == -1} {
     package require tcltest
@@ -497,6 +497,7 @@ test trace-8.8 {error returns from traces} {
     for {set y 0} {$y<100} {incr y} {
 	catch {set x junk}
     }
+    unset x
 } {}
 
 # Check to see that variables are expunged before trace
-- 
cgit v0.12