diff options
author | dgp <dgp@noemail.net> | 2002-07-14 18:31:46 (GMT) |
---|---|---|
committer | dgp <dgp@noemail.net> | 2002-07-14 18:31:46 (GMT) |
commit | f379356501c427b98f96cd4b2ee4f834b15fb951 (patch) | |
tree | dfbcb9903f222a7bc8d5b73a08fa79f5bfbe4372 /tests/event.test | |
parent | ceb5e6c0462d8143c9a291d16b908095b7fc1872 (diff) | |
download | tk-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.test | 4 |
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 {} |