diff options
| author | fvogel <fvogelnew1@free.fr> | 2015-12-19 22:54:54 (GMT) |
|---|---|---|
| committer | fvogel <fvogelnew1@free.fr> | 2015-12-19 22:54:54 (GMT) |
| commit | 56005a00aae9d8be182d5643373980ee371417d6 (patch) | |
| tree | 2ed3d9df7b0f4d317df931efaac15f719252c928 /tests | |
| parent | 545a4416a85546b7b713c06ed8ca42c6932b9887 (diff) | |
| parent | 206fdec2adc973a08951dafa6b30a911e82918d5 (diff) | |
| download | tk-56005a00aae9d8be182d5643373980ee371417d6.zip tk-56005a00aae9d8be182d5643373980ee371417d6.tar.gz tk-56005a00aae9d8be182d5643373980ee371417d6.tar.bz2 | |
Fixed bug [793909] - Problem with nonexistent namespaces
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/entry.test | 6 | ||||
| -rw-r--r-- | tests/spinbox.test | 6 |
2 files changed, 12 insertions, 0 deletions
diff --git a/tests/entry.test b/tests/entry.test index da8f280..da3637d 100644 --- a/tests/entry.test +++ b/tests/entry.test @@ -1641,6 +1641,12 @@ test entry-23.1 {error in trace proc attached to the textvariable} { } [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} { + destroy .e + catch {entry .e -textvariable thisnsdoesntexist::myvar} result1 + set result1 +} {can't trace "thisnsdoesntexist::myvar": parent namespace doesn't exist} + destroy .e # XXX Still need to write tests for EntryBlinkProc, EntryFocusProc, diff --git a/tests/spinbox.test b/tests/spinbox.test index 5fba390..68c6fae 100644 --- a/tests/spinbox.test +++ b/tests/spinbox.test @@ -1599,6 +1599,12 @@ test spinbox-24.1 {error in trace proc attached to the textvariable} { {can't set "myvar": Intentional error here!} \ {can't set "myvar": Intentional error here!}] +test spinbox-25.1 {textvariable lives in a non-existing namespace} { + destroy .s + catch {spinbox .s -textvariable thisnsdoesntexist::myvar} result1 + set result1 +} {can't trace "thisnsdoesntexist::myvar": parent namespace doesn't exist} + catch {unset ::e ::vVals} ## |