diff options
author | fvogel <fvogelnew1@free.fr> | 2017-10-25 17:31:09 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2017-10-25 17:31:09 (GMT) |
commit | d8cae66217adcfb4920030071e54e37b5a88a1c4 (patch) | |
tree | 3a104c4db5489cefae38e588c451f5be70c7635d | |
parent | 40ce2eccbc52b403d4a4b7bc479fbde987a14e18 (diff) | |
download | tcl-d8cae66217adcfb4920030071e54e37b5a88a1c4.zip tcl-d8cae66217adcfb4920030071e54e37b5a88a1c4.tar.gz tcl-d8cae66217adcfb4920030071e54e37b5a88a1c4.tar.bz2 |
Fix typo in set-old.test
-rw-r--r-- | tests/set-old.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/set-old.test b/tests/set-old.test index 3b4184c..b2e7aa6 100644 --- a/tests/set-old.test +++ b/tests/set-old.test @@ -652,7 +652,7 @@ test set-old-8.52 {array command, array names -regexp on regexp pattern} { set a(11) 1 list [catch {lsort [array names a -regexp ^1]} msg] $msg } {0 {1*2 11 12}} -?test set-old-8.52.1 {array command, array names -regexp, backrefs} { +test set-old-8.52.1 {array command, array names -regexp, backrefs} { catch {unset a} set a(1*2) 1 set a(12) 1 |