summaryrefslogtreecommitdiffstats
path: root/tests/dict.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/dict.test')
-rw-r--r--tests/dict.test8
1 files changed, 4 insertions, 4 deletions
diff --git a/tests/dict.test b/tests/dict.test
index f9c5c5a..e4d5994 100644
--- a/tests/dict.test
+++ b/tests/dict.test
@@ -9,10 +9,10 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: dict.test,v 1.3 2003/07/24 16:05:24 dgp Exp $
+# RCS: @(#) $Id: dict.test,v 1.4 2003/10/06 14:32:22 dgp Exp $
if {[lsearch [namespace children] ::tcltest] == -1} {
- package require tcltest
+ package require tcltest 2
namespace import -force ::tcltest::*
}
@@ -318,7 +318,7 @@ test dict-12.3 {dict lappend command} {
set dictv {a a}
dict lappend dictv a b c
} {a {a b c}}
-test dict-12.2 {dict lappend command} {
+test dict-12.2.1 {dict lappend command} {
set dictv [dict create a [string index =a= 1]]
dict lappend dictv a b
} {a {a b}}
@@ -365,7 +365,7 @@ test dict-13.3 {dict append command} {
set dictv {a a}
dict append dictv a b c
} {a abc}
-test dict-13.2 {dict append command} {
+test dict-13.2.1 {dict append command} {
set dictv [dict create a [string index =a= 1]]
dict append dictv a b
} {a ab}