diff options
| author | fvogel <fvogelnew1@free.fr> | 2022-10-09 17:13:26 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2022-10-09 17:13:26 (GMT) |
| commit | 32c598481ec950f2ad3a2c40decb445dfab1d377 (patch) | |
| tree | a481200fd1e33f4c83fff1c5b7bfd94e06dbda84 /tests | |
| parent | 9220902d1363e9a5cef7a48ed465562da9cec296 (diff) | |
| download | tk-32c598481ec950f2ad3a2c40decb445dfab1d377.zip tk-32c598481ec950f2ad3a2c40decb445dfab1d377.tar.gz tk-32c598481ec950f2ad3a2c40decb445dfab1d377.tar.bz2 | |
Avoid possible hangs in frame-12.3 and textImage-4.2. Hangs were (rarely) observed with frame-12.3 on macOS..
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/frame.test | 2 | ||||
| -rw-r--r-- | tests/textImage.test | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/tests/frame.test b/tests/frame.test index ab09ca6..026913f 100644 --- a/tests/frame.test +++ b/tests/frame.test @@ -1168,7 +1168,7 @@ test frame-12.3 {FrameWorldChanged procedure} -setup { set y1 [winfo y .f.f] set fontwait 0 font configure myfont -size 20 - vwait fontwait + if {!$fontwait} {vwait fontwait} update set h2 [font metrics myfont -linespace] set y2 [winfo y .f.f] diff --git a/tests/textImage.test b/tests/textImage.test index 7833e98..4301878 100644 --- a/tests/textImage.test +++ b/tests/textImage.test @@ -394,7 +394,7 @@ test textImage-4.2 {alignment checking - baseline} -setup { set fontwait 0 font configure test_font2 -size $size array set Metrics [font metrics test_font2] - vwait fontwait + if {!$fontwait} {vwait fontwait} update foreach {x y w h} [.t bbox small] {} set norm [expr { |