summaryrefslogtreecommitdiffstats
path: root/tests/pack.test
diff options
context:
space:
mode:
authordkf <dkf@noemail.net>2004-12-04 00:04:21 (GMT)
committerdkf <dkf@noemail.net>2004-12-04 00:04:21 (GMT)
commit6bac3a14be15a56bdcc4a7adeba1a9de6f984873 (patch)
tree5fad790e8125f78d340ac378796278500e909848 /tests/pack.test
parent952eaa53a60d60ee8fe683bd5132754a33cbf2ad (diff)
downloadtk-6bac3a14be15a56bdcc4a7adeba1a9de6f984873.zip
tk-6bac3a14be15a56bdcc4a7adeba1a9de6f984873.tar.gz
tk-6bac3a14be15a56bdcc4a7adeba1a9de6f984873.tar.bz2
Split duplicate test names [Bug 1078648]
FossilOrigin-Name: b6ab93bceb2b3997b5406becf947ca5c3948ac0d
Diffstat (limited to 'tests/pack.test')
-rw-r--r--tests/pack.test4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/pack.test b/tests/pack.test
index cb514e7..2ca2e13 100644
--- a/tests/pack.test
+++ b/tests/pack.test
@@ -6,7 +6,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: pack.test,v 1.12 2003/04/01 21:06:48 dgp Exp $
+# RCS: @(#) $Id: pack.test,v 1.13 2004/12/04 00:04:41 dkf Exp $
package require tcltest 2.1
eval tcltest::configure $argv
@@ -132,7 +132,7 @@ test pack-2.11 {x padding and filling} {
test pack-2.12 {x padding and filling} {
pack1 -side top -ipadx 5 -padx 10 -fill x
} {280x40+10+0 300x160+0+40}
-test pack-2.12 {x padding and filling} {
+test pack-2.12a {x padding and filling} {
pack1 -side top -ipadx 5 -padx {5 15} -fill x
} {280x40+5+0 300x160+0+40}
set pad [winfo pixels .pack 1c]