diff options
author | fvogel <fvogelnew1@free.fr> | 2015-10-03 19:32:12 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2015-10-03 19:32:12 (GMT) |
commit | e2f4951c81ba0437d402871c1e5d5064e6c578a2 (patch) | |
tree | 3b9674cfd3a76ce7d09656a416ced7cdfe416133 /tests/text.test | |
parent | a7bd1b8b54051af0e4a59ca36d6fa8cbbd221487 (diff) | |
download | tk-e2f4951c81ba0437d402871c1e5d5064e6c578a2.zip tk-e2f4951c81ba0437d402871c1e5d5064e6c578a2.tar.gz tk-e2f4951c81ba0437d402871c1e5d5064e6c578a2.tar.bz2 |
Fixed bug [1669632fff] case (i) - autoseparator was missing on <Control-1>
Diffstat (limited to 'tests/text.test')
-rw-r--r-- | tests/text.test | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/text.test b/tests/text.test index fa00ce3..e170fb4 100644 --- a/tests/text.test +++ b/tests/text.test @@ -3205,6 +3205,20 @@ test text-25.18 {patch 1469210 - inserting after undo} -setup { } -cleanup { destroy .t } -result 1 +test text-25.19 {patch 1669632 (i) - undo after Contron-1} -setup { + destroy .t +} -body { + text .t -undo 1 + .t insert end foo\nbar + .t edit reset + .t insert 2.2 WORLD + event generate .t <Control-1> -x 1 -y 1 + .t insert insert HELLO + .t edit undo + .t get 2.2 2.7 +} -cleanup { + destroy .t +} -result WORLD test text-26.1 {bug fix - 624372, ControlUtfProc long lines} { destroy .t |