diff options
author | fvogel <fvogelnew1@free.fr> | 2016-03-23 16:55:30 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2016-03-23 16:55:30 (GMT) |
commit | d9a6a00d31a183d425194924b689789e608dc7aa (patch) | |
tree | dc38ab00d74e214d8c2762228887a2e4d89a1835 /tests/window.test | |
parent | 80c74be24faeeddbe71c2078229afbde8d89e3dc (diff) | |
download | tk-d9a6a00d31a183d425194924b689789e608dc7aa.zip tk-d9a6a00d31a183d425194924b689789e608dc7aa.tar.gz tk-d9a6a00d31a183d425194924b689789e608dc7aa.tar.bz2 |
Fixed [3512539fff] - .. is silently accepted in widget paths
Diffstat (limited to 'tests/window.test')
-rw-r--r-- | tests/window.test | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/window.test b/tests/window.test index fea695a..f02db3e 100644 --- a/tests/window.test +++ b/tests/window.test @@ -39,7 +39,9 @@ test window-1.1 {Tk_CreateWindowFromPath procedure, parent dead} -setup { while executing "button .t.b -text hello" (command bound to event)}} - +test window-1.2 {Tk_CreateWindowFromPath procedure, pathname starting with two dots} -body { + label ..mylabel +} -returnCodes error -result {bad window path name "..mylabel"} # Most of the tests below don't produce meaningful results; they # will simply dump core if there are bugs. |