diff options
author | fvogel <fvogelnew1@free.fr> | 2015-10-25 19:58:08 (GMT) |
---|---|---|
committer | fvogel <fvogelnew1@free.fr> | 2015-10-25 19:58:08 (GMT) |
commit | 2fb7c126ab1a68f237aee91ecd26b5f2eb6e074d (patch) | |
tree | 4a5690317893fad0466e0cdcfa6b87db4c5dd141 /tests/menu.test | |
parent | 72df3089578116c1b9fdfb15a1c9b1e20a66dc2a (diff) | |
download | tk-2fb7c126ab1a68f237aee91ecd26b5f2eb6e074d.zip tk-2fb7c126ab1a68f237aee91ecd26b5f2eb6e074d.tar.gz tk-2fb7c126ab1a68f237aee91ecd26b5f2eb6e074d.tar.bz2 |
Added new test to check for error triggering when posting a menu of type menubarbug_2160206fff
Diffstat (limited to 'tests/menu.test')
-rw-r--r-- | tests/menu.test | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/tests/menu.test b/tests/menu.test index cfe00b9..c797281 100644 --- a/tests/menu.test +++ b/tests/menu.test @@ -2566,6 +2566,15 @@ test menu-36.1 {menu -underline string overruns Bug 1599877} {} { tk::TraverseToMenu . "e" } {} +test menu-37.1 {menubar menues cannot be posted - bug 2160206} {} { + # On Linux the following used to panic + # It now returns an error (on all platforms) + catch {destroy .m} + menu .m -type menubar + list [catch ".m post 1 1" msg] $msg +} {1 {a menubar menu cannot be posted}} + + # cleanup deleteWindows cleanupTests |