From 7feb0a2ec8f0544fcbf584d987c6102abf6c24ca Mon Sep 17 00:00:00 2001
From: fvogel <fvogelnew1@free.fr>
Date: Sat, 22 Nov 2014 22:23:41 +0000
Subject: Added test for bug [7703f947aa] - Wrong refresh of display lines when
 tagging text as elided

---
 tests/textDisp.test | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/tests/textDisp.test b/tests/textDisp.test
index ef65956..96670ac 100644
--- a/tests/textDisp.test
+++ b/tests/textDisp.test
@@ -1262,6 +1262,19 @@ test textDisp-9.11 {TkTextRedrawTag} {
     update
     set tk_textRedraw
 } {}
+test textDisp-9.12 {TkTextRedrawTag} {
+    .t configure -wrap char
+    .t delete 1.0 end
+    for {set i 1} {$i < 5} {incr i} {
+      .t insert end "Line $i+++Line $i\n"
+    }
+    .t tag configure hidden -elide true
+    .t tag add hidden 2.6 3.6
+    update
+    .t tag add hidden 3.11 4.6
+    update
+    list $tk_textRelayout $tk_textRedraw
+} {2.0 {2.0 eof}}
 
 test textDisp-10.1 {TkTextRelayoutWindow} {
     .t configure -wrap char
-- 
cgit v0.12