diff options
| author | pspjuth <peter.spjuth@gmail.com> | 2009-08-19 23:01:59 (GMT) |
|---|---|---|
| committer | pspjuth <peter.spjuth@gmail.com> | 2009-08-19 23:01:59 (GMT) |
| commit | 2b61fda7660e28461b6dfe55f422c70aa390483d (patch) | |
| tree | a4c7c1cd7c558900a4ca247babd4096d872f1f42 /tests/textIndex.test | |
| parent | f4cf4a95f73b53ac9c0a6e3c93d9676d2877598e (diff) | |
| download | tk-2b61fda7660e28461b6dfe55f422c70aa390483d.zip tk-2b61fda7660e28461b6dfe55f422c70aa390483d.tar.gz tk-2b61fda7660e28461b6dfe55f422c70aa390483d.tar.bz2 | |
Give an error if grid and pack are used in the same master. [Patch 2475855]
Diffstat (limited to 'tests/textIndex.test')
| -rw-r--r-- | tests/textIndex.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/textIndex.test b/tests/textIndex.test index 1546973..3b417d0 100644 --- a/tests/textIndex.test +++ b/tests/textIndex.test @@ -6,7 +6,7 @@ # Copyright (c) 1998-1999 by Scriptics Corporation. # All rights reserved. # -# RCS: @(#) $Id: textIndex.test,v 1.18 2005/07/18 22:12:05 vincentdarley Exp $ +# RCS: @(#) $Id: textIndex.test,v 1.19 2009/08/19 23:02:00 pspjuth Exp $ package require tcltest 2.1 eval tcltest::configure $argv @@ -784,7 +784,7 @@ test textIndex-19.12 {Display lines} { } {2.20} test textIndex-19.13 {Display lines} { - destroy .t + destroy {*}[pack slaves .] text .txt -height 1 -wrap word -yscroll ".sbar set" -width 400 scrollbar .sbar -command ".txt yview" grid .txt .sbar -sticky news |