summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2022-07-20 20:30:01 (GMT)
committerfvogel <fvogelnew1@free.fr>2022-07-20 20:30:01 (GMT)
commit2dfc951c8449a0bc45305ea4a62e2f995c03bc8a (patch)
tree41b31730897b6f35d8a4327d35d642dc58cbfe14
parenteafc1baa9c6aed1d56baf456b84a5d2849b49be9 (diff)
downloadtk-2dfc951c8449a0bc45305ea4a62e2f995c03bc8a.zip
tk-2dfc951c8449a0bc45305ea4a62e2f995c03bc8a.tar.gz
tk-2dfc951c8449a0bc45305ea4a62e2f995c03bc8a.tar.bz2
The previous commit [45843325] also fixes [61e0bb8aab]: Embedded windows in a text widget cannot be removed on macOS. Remove the 'aquaKnownBug' constraints on the concerned tests in textWind.test.
-rw-r--r--tests/textWind.test26
1 files changed, 12 insertions, 14 deletions
diff --git a/tests/textWind.test b/tests/textWind.test
index 1157385..7504476 100644
--- a/tests/textWind.test
+++ b/tests/textWind.test
@@ -346,62 +346,60 @@ test textWind-3.1 {EmbWinConfigure procedure} -setup {
destroy .f
} -returnCodes error -result {unknown option "-foo"}
-# The next 4 tests are constrained by aquaKnownBug until the fix for ticket
-# [61e0bb8aab] gets merged
-test textWind-3.2 {EmbWinConfigure procedure} -constraints {aquaKnownBug} -setup {
+test textWind-3.2 {EmbWinConfigure procedure} -setup {
destroy .f
} -body {
.t insert 1.0 "Some sample text"
frame .f -width 10 -height 20 -bg $color
.t window create 1.3 -window .f
- waitForMap .f
+ updateWidgets
.t window configure 1.3 -window {}
- waitForUnmap .f
+ updateWidgets
.t index .f
} -cleanup {
destroy .f
} -returnCodes error -result {bad text index ".f"}
-test textWind-3.3 {EmbWinConfigure procedure} -constraints {aquaKnownBug} -setup {
+test textWind-3.3 {EmbWinConfigure procedure} -setup {
destroy .f
} -body {
.t insert 1.0 "Some sample text"
frame .f -width 10 -height 20 -bg $color
.t window create 1.3 -window .f
- waitForMap .f
+ updateWidgets
set res [winfo ismapped .f]
.t window configure 1.3 -window {}
- waitForUnmap .f
+ updateWidgets
lappend res [winfo ismapped .f] [.t bbox 1.4]
} -cleanup {
destroy .f
} -result [list 1 0 \
[list [expr {$padx+3*$fixedWidth}] $pady $fixedWidth $fixedHeight]]
-test textWind-3.4 {EmbWinConfigure procedure} -constraints {aquaKnownBug} -setup {
+test textWind-3.4 {EmbWinConfigure procedure} -setup {
destroy .t.f
} -body {
.t insert 1.0 "Some sample text"
frame .t.f -width 10 -height 20 -bg $color
.t window create 1.3 -window .t.f
- waitForMap .t.f
+ updateWidgets
.t window configure 1.3 -window {}
- waitForUnmap .t.f
+ updateWidgets
.t index .t.f
} -cleanup {
destroy .t.f
} -returnCodes error -result {bad text index ".t.f"}
-test textWind-3.5 {EmbWinConfigure procedure} -constraints {aquaKnownBug} -setup {
+test textWind-3.5 {EmbWinConfigure procedure} -setup {
destroy .t.f
} -body {
.t insert 1.0 "Some sample text"
frame .t.f -width 10 -height 20 -bg $color
.t window create 1.3 -window .t.f
- waitForMap .t.f
+ updateWidgets
set res [winfo ismapped .t.f]
.t window configure 1.3 -window {}
- waitForUnmap .t.f
+ updateWidgets
lappend res [winfo ismapped .t.f] [.t bbox 1.4]
} -cleanup {
destroy .t.f