diff options
| author | fvogel <fvogelnew1@free.fr> | 2017-06-30 20:26:22 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2017-06-30 20:26:22 (GMT) |
| commit | 12df76a8e7d275cc5d064e6ba8566ab0090fd059 (patch) | |
| tree | 92ad5890b0dca1d14a21c27599d5863bc035d28d /tests/text.test | |
| parent | 7285457c44294dac69ee359982b9e936b0c8ee78 (diff) | |
| parent | 06a20b7c52f6d92e87cff3c1527a0b0fa5590c20 (diff) | |
| download | tk-12df76a8e7d275cc5d064e6ba8566ab0090fd059.zip tk-12df76a8e7d275cc5d064e6ba8566ab0090fd059.tar.gz tk-12df76a8e7d275cc5d064e6ba8566ab0090fd059.tar.bz2 | |
Fix [62c5b7a1d7]: [text] segfaults on replace. Patch from Christian Werner.
Diffstat (limited to 'tests/text.test')
| -rw-r--r-- | tests/text.test | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/text.test b/tests/text.test index 50db250..17eb79c 100644 --- a/tests/text.test +++ b/tests/text.test @@ -1589,6 +1589,16 @@ test text-8.26 {TextWidgetCmd procedure, "replace" option crash} -setup { } -cleanup { destroy .tt } -result {} +test text-8.27 {TextWidgetCmd procedure, "replace" option crash} -setup { + text .tt +} -body { + .tt insert 0.0 \na + for {set i 0} {$i < 2} {incr i} { + .tt replace 2.0 3.0 b + } +} -cleanup { + destroy .tt +} -result {} test text-9.1 {TextWidgetCmd procedure, "get" option} -setup { |