summaryrefslogtreecommitdiffstats
path: root/tests/listbox.test
diff options
context:
space:
mode:
authordgp <dgp@noemail.net>2004-12-08 03:02:51 (GMT)
committerdgp <dgp@noemail.net>2004-12-08 03:02:51 (GMT)
commit992428556af8f13be52512789a74cb6d8da436a4 (patch)
tree0d85c25f22d5dc509dc72c795506d36d9ae793f9 /tests/listbox.test
parent96028f4f58e5343fcadf3b8b632b68f2ec67242a (diff)
downloadtk-992428556af8f13be52512789a74cb6d8da436a4.zip
tk-992428556af8f13be52512789a74cb6d8da436a4.tar.gz
tk-992428556af8f13be52512789a74cb6d8da436a4.tar.bz2
* tests/canvPs.test: Cleaned up the matching of [makeFile] and
* tests/choosedir.test: [removeFile] commands as indicated by the * tests/filebox.test: results of a -debug 1 run of the test suite. * tests/imgPPM.test: Tk test suite is now -debug 1 clean. This * tests/imgPhoto.test: completes fixing [1078648]. * tests/listbox.test: * tests/main.test: FossilOrigin-Name: 27f85236860c30c83c0d859b2c5b807868dc8557
Diffstat (limited to 'tests/listbox.test')
-rw-r--r--tests/listbox.test3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/listbox.test b/tests/listbox.test
index 73b068a..8534e10 100644
--- a/tests/listbox.test
+++ b/tests/listbox.test
@@ -6,7 +6,7 @@
# Copyright (c) 1998-1999 by Scriptics Corporation.
# All rights reserved.
#
-# RCS: @(#) $Id: listbox.test,v 1.24 2004/12/04 00:04:41 dkf Exp $
+# RCS: @(#) $Id: listbox.test,v 1.25 2004/12/08 03:03:06 dgp Exp $
package require tcltest 2.1
eval tcltest::configure $argv
@@ -943,6 +943,7 @@ test listbox-4.18 {ConfigureListbox, no listvar -> bad listvar} {
"unmatched open quote in list: invalid -listvariable value"]
test listbox-4.19 {ConfigureListbox, no listvar -> bad non-existent listvar} {
catch {destroy .l}
+ unset -nocomplain ::foo
listbox .l -listvar foo
.l insert end a b c d
catch {.l configure -listvar ::zoo::bar::foo} result