summaryrefslogtreecommitdiffstats
path: root/tests/event.test
diff options
context:
space:
mode:
authordgp <dgp@noemail.net>2002-07-14 18:31:46 (GMT)
committerdgp <dgp@noemail.net>2002-07-14 18:31:46 (GMT)
commitf379356501c427b98f96cd4b2ee4f834b15fb951 (patch)
treedfbcb9903f222a7bc8d5b73a08fa79f5bfbe4372 /tests/event.test
parentceb5e6c0462d8143c9a291d16b908095b7fc1872 (diff)
downloadtk-f379356501c427b98f96cd4b2ee4f834b15fb951.zip
tk-f379356501c427b98f96cd4b2ee4f834b15fb951.tar.gz
tk-f379356501c427b98f96cd4b2ee4f834b15fb951.tar.bz2
* tests/event.test: Fixes to enable testing of only userInteraction
* tests/visual_bb.test: tests. FossilOrigin-Name: d9d305209f01ed248174bb79929aa6f419dbb90d
Diffstat (limited to 'tests/event.test')
-rw-r--r--tests/event.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/event.test b/tests/event.test
index 9637acd..92a4396 100644
--- a/tests/event.test
+++ b/tests/event.test
@@ -6,7 +6,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: event.test,v 1.10 2002/07/14 05:48:46 dgp Exp $
+# RCS: @(#) $Id: event.test,v 1.11 2002/07/14 18:31:48 dgp Exp $
package require tcltest 2.1
namespace import -force tcltest::configure
@@ -650,7 +650,7 @@ test event-triple-click-drag-1.1 { Triple click and drag across lines in
destroy .t
-unset keypress_lookup
+unset -nocomplain keypress_lookup
rename _init_keypress_lookup {}
rename _keypress_lookup {}
rename _keypress {}