diff options
author | Steve Bennett <steveb@workware.net.au> | 2011-08-01 11:07:32 +1000 |
---|---|---|
committer | Steve Bennett <steveb@workware.net.au> | 2011-08-01 11:07:32 +1000 |
commit | cbeb3ea3fba64cca44600df912ea04656e0bf7f2 (patch) | |
tree | 903a8e1025a9bca520e23d9181a23a1504af3659 /tests | |
parent | 511deea93dd23de9794c7e84ece07bad807db789 (diff) | |
download | jimtcl-cbeb3ea3fba64cca44600df912ea04656e0bf7f2.zip jimtcl-cbeb3ea3fba64cca44600df912ea04656e0bf7f2.tar.gz jimtcl-cbeb3ea3fba64cca44600df912ea04656e0bf7f2.tar.bz2 |
dict unset should not return error on missing last key
dict unset was returning an error with no message
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests')
-rw-r--r-- | tests/dict.test | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/tests/dict.test b/tests/dict.test index dc36b39..31250b1 100644 --- a/tests/dict.test +++ b/tests/dict.test @@ -197,5 +197,10 @@ test dict-22.11 {dict with command: no recursive structures [Bug 1786481]} { string range [append foo OK] end-1 end } OK +test dict-23.1 {dict unset missing last level} { + set a {b c d e} + dict unset a xyz + dict size $a +} 2 testreport |