diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-10-10 08:07:06 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-10-10 08:07:06 (GMT) |
commit | 56de2058b0be5410f7b9f6c913c1a70b418137a6 (patch) | |
tree | eb6d54a0f82fb37b5d47caebf727623f1250fe72 /tests/image.test | |
parent | df640a1dfa81b087de3bc53f2b4c4b2388d3d8da (diff) | |
download | tk-56de2058b0be5410f7b9f6c913c1a70b418137a6.zip tk-56de2058b0be5410f7b9f6c913c1a70b418137a6.tar.gz tk-56de2058b0be5410f7b9f6c913c1a70b418137a6.tar.bz2 |
Change a few "update idletask" from previous commit back to "update". Other platforms most likely need it this way.
Diffstat (limited to 'tests/image.test')
-rw-r--r-- | tests/image.test | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/image.test b/tests/image.test index 70c3f72..6d51e51 100644 --- a/tests/image.test +++ b/tests/image.test @@ -88,12 +88,12 @@ test image-1.8 {Tk_ImageCmd procedure, "create" option} -constraints { .c create image 100 50 -image myimage .c create image 100 150 -image myimage image delete myimage - update idletasks + update set x {} image create test myimage -variable x # macOS Catalina needs a delay here. after 20 - update idletasks + update return $x } -cleanup { .c delete all @@ -400,13 +400,13 @@ test image-9.2 {Tk_ImageChanged procedure} -constraints testImageType -setup { image create test foo -variable x .c create image 50 50 -image foo .c create image 90 100 -image foo - update idletasks + update set x {} foo changed 5 6 7 8 30 15 image create test myimage -variable x # macOS Catalina needs a delay here. after 20 - update idletasks + update return $x } -cleanup { .c delete all @@ -442,11 +442,11 @@ test image-11.1 {Tk_FreeImage procedure} -constraints testImageType -setup { .c create image 50 50 -image foo -tags i1 .c create image 90 100 -image foo -tags i2 pack forget .c - update idletasks + update set x {} .c delete i1 pack .c - update idletasks + update # macOS Catalina needs a delay here. after 20 list [imageNames] $x |