diff options
| author | fvogel <fvogelnew1@free.fr> | 2023-04-23 08:33:17 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2023-04-23 08:33:17 (GMT) |
| commit | 878ffa4839c4f5d277daf8b0097faaf42c229b1d (patch) | |
| tree | 4b63305e028a904c03ec931d27f1dfe8e9397c6d /tests/text.test | |
| parent | ec66b9a3b5e1fcf6085293385e06a9f9e611a500 (diff) | |
| download | tk-878ffa4839c4f5d277daf8b0097faaf42c229b1d.zip tk-878ffa4839c4f5d277daf8b0097faaf42c229b1d.tar.gz tk-878ffa4839c4f5d277daf8b0097faaf42c229b1d.tar.bz2 | |
Robustify text-27.15b that failed after [898c0657], on macOS with aqua only. The failure was due to TextClosestGap now correctly returning 1.0 (was erroneously 1.1 before) since the given position (15,3) is above the text area of the widget in the macOS aqua case due to -highlightthickness default value 3, which is not the case on other platforms. Since we are here, robustify text-27.15c as well.
Diffstat (limited to 'tests/text.test')
| -rw-r--r-- | tests/text.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/text.test b/tests/text.test index 849c8f6..c5ab92b 100644 --- a/tests/text.test +++ b/tests/text.test @@ -6662,7 +6662,7 @@ test text-27.15b {<<Selection>> virtual event on <<PasteSelection>> inside widge bind .t <<Selection>> "set ::retval <<Selection>>_fired" update set ::retval no_<<Selection>>_event_fired - event generate .t <<PasteSelection>> -x 15 -y 3 + event generate .t <<PasteSelection>> -x 15 -y [lindex [.t dlineinfo 1.0] 1] update set ::retval } -cleanup { @@ -6676,7 +6676,7 @@ test text-27.15c {No <<Selection>> virtual event on <<PasteSelection>> outside w bind .t <<Selection>> "set ::retval <<Selection>>_fired" update set ::retval no_<<Selection>>_event_fired - event generate .t <<PasteSelection>> -x 15 -y 80 + event generate .t <<PasteSelection>> -x 15 -y [lindex [.t dlineinfo 2.0] 1] update set ::retval } -cleanup { |