diff options
author | fvogel <fvogelnew1@free.fr> | 2015-12-19 23:14:35 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2015-12-19 23:14:35 (GMT) |
commit | f9b0ceca7b9605cfb1f2de0b7d1315f0d33aec3f (patch) | |
tree | c8b944ca7d0bb9ecc57c4108e6936ecc1f24f0d7 /tests/entry.test | |
parent | 05f8ab77f8dcabb1f3ad9394d48bc670277885e0 (diff) | |
parent | 56005a00aae9d8be182d5643373980ee371417d6 (diff) | |
download | tk-f9b0ceca7b9605cfb1f2de0b7d1315f0d33aec3f.zip tk-f9b0ceca7b9605cfb1f2de0b7d1315f0d33aec3f.tar.gz tk-f9b0ceca7b9605cfb1f2de0b7d1315f0d33aec3f.tar.bz2 |
Fixed bug [793909] - Problem with nonexistent namespaces
Diffstat (limited to 'tests/entry.test')
-rw-r--r-- | tests/entry.test | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/entry.test b/tests/entry.test index 4cc9218..9c30b00 100644 --- a/tests/entry.test +++ b/tests/entry.test @@ -3493,6 +3493,15 @@ test entry-23.1 {error in trace proc attached to the textvariable} -setup { } -result [list {can't set "myvar": Intentional error here!} \ {can't set "myvar": Intentional error here!}] +test entry-24.1 {textvariable lives in a non-existing namespace} -setup { + destroy .e +} -body { + catch {entry .e -textvariable thisnsdoesntexist::myvar} result1 + set result1 +} -cleanup { + destroy .e +} -result {can't trace "thisnsdoesntexist::myvar": parent namespace doesn't exist} + # Gathered comments about lacks # XXX Still need to write tests for EntryBlinkProc, EntryFocusProc, # and EntryTextVarProc. |