summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2022-03-08 20:18:18 (GMT)
committerfvogel <fvogelnew1@free.fr>2022-03-08 20:18:18 (GMT)
commit822af973da0c377d5fdc2807967d49a41b687c7e (patch)
tree615e09d0548b0a74c72d4105845ecb86889787f6
parent073080595902ccbf4873b9258c1885b3ee641a96 (diff)
downloadtk-822af973da0c377d5fdc2807967d49a41b687c7e.zip
tk-822af973da0c377d5fdc2807967d49a41b687c7e.tar.gz
tk-822af973da0c377d5fdc2807967d49a41b687c7e.tar.bz2
Cherrypick [541e50a5] in order to add test textDisp-32.4 for the legacy text widget as it was added for the revised text widget. So we avoid unnecessary differences in the test suite for the two text widgets.
-rw-r--r--tests/textDisp.test14
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/textDisp.test b/tests/textDisp.test
index 5dfed82..c56ca26 100644
--- a/tests/textDisp.test
+++ b/tests/textDisp.test
@@ -4216,6 +4216,20 @@ test textDisp-32.3 "NULL undisplayProc problems: #1791052" -setup {
image delete $img
destroy .tt
}
+test textDisp-32.4 {Button-1 click with elided lines - Bug 18371b7ce7} -setup {
+ pack [text .tt -borderwidth 0 -highlightthickness 0]
+ for {set n 1} {$n <= 5} {incr n} {
+ .tt insert end "Line $n\n"
+ }
+ .tt tag configure Elided -elide 1
+ .tt tag add Elided 1.2 4.0
+ update
+} -body {
+ event generate .tt <Button-1> -x 1 -y 1
+ .tt index insert
+} -cleanup {
+ destroy .tt
+} -result {1.0}
test textDisp-33.0 {one line longer than fits in the widget} {
pack [text .tt -wrap char]