diff options
| -rw-r--r-- | tests/testutils.tcl | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/tests/testutils.tcl b/tests/testutils.tcl index f5c9c45..27d53a1 100644 --- a/tests/testutils.tcl +++ b/tests/testutils.tcl @@ -133,10 +133,6 @@ namespace eval ::tk::test::generic { proc pause {ms} { variable _pause - if {! [info exists _pause(count)]} { - set _pause(count) 0 - } - set num [incr _pause(count)] set _pause($num) 1 |