diff options
author | fvogel <fvogelnew1@free.fr> | 2022-07-20 20:30:01 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2022-07-20 20:30:01 (GMT) |
commit | 2dfc951c8449a0bc45305ea4a62e2f995c03bc8a (patch) | |
tree | 41b31730897b6f35d8a4327d35d642dc58cbfe14 | |
parent | eafc1baa9c6aed1d56baf456b84a5d2849b49be9 (diff) | |
download | tk-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.test | 26 |
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 |