diff options
| author | erikleunissen <elns@xs4all.nl> | 2025-04-01 16:16:46 (GMT) |
|---|---|---|
| committer | erikleunissen <elns@xs4all.nl> | 2025-04-01 16:16:46 (GMT) |
| commit | 71c1e38c3dda37de10fc41f0ecf5ce11487c27de (patch) | |
| tree | 410ab9eec7d4b52121ca6ffe7a31e7af3f15ddae /tests | |
| parent | 3c45da3500cdb37e1878536dfaea0cb3ce72f439 (diff) | |
| download | tk-FINAL_REVIEW.zip tk-FINAL_REVIEW.tar.gz tk-FINAL_REVIEW.tar.bz2 | |
testutils.tcl [pause]: more simplificationFINAL_REVIEW
Diffstat (limited to 'tests')
| -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 |