diff options
author | culler <culler> | 2023-12-06 20:27:46 (GMT) |
---|---|---|
committer | culler <culler> | 2023-12-06 20:27:46 (GMT) |
commit | 8a1948af29ccf03658724cf589bdf9deb773911b (patch) | |
tree | ad6a12f072083028ce7aabd1f2ed374bab9fc111 | |
parent | 2f27571a5b6fe32eb945073839b1a67cf4dc2ba2 (diff) | |
parent | cf28e70a810d8fe325d1724cc5db74e9e0732a5f (diff) | |
download | tk-8a1948af29ccf03658724cf589bdf9deb773911b.zip tk-8a1948af29ccf03658724cf589bdf9deb773911b.tar.gz tk-8a1948af29ccf03658724cf589bdf9deb773911b.tar.bz2 |
Merge core-8-6-branch
-rw-r--r-- | tests/focus.test | 1 | ||||
-rw-r--r-- | tests/wm.test | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/tests/focus.test b/tests/focus.test index 1a318c3..ecbf496 100644 --- a/tests/focus.test +++ b/tests/focus.test @@ -78,6 +78,7 @@ if {[testConstraint altDisplay]} { test focus-1.1 {Tk_FocusCmd procedure} -constraints unix -body { focusClear + after 100 focus } -result {} test focus-1.2 {Tk_FocusCmd procedure} -constraints { diff --git a/tests/wm.test b/tests/wm.test index 222dcb8..9fb3c73 100644 --- a/tests/wm.test +++ b/tests/wm.test @@ -101,7 +101,7 @@ testConstraint failsOnXQuarz [expr {$tcl_platform(os) ne "Darwin" || [tk windowi # proc raiseDelay {} { - after 100; + after 200; update update idletasks } |