summaryrefslogtreecommitdiffstats
path: root/tests/menu.test
diff options
context:
space:
mode:
authorfvogel <fvogelnew1@free.fr>2015-10-25 19:58:08 (GMT)
committerfvogel <fvogelnew1@free.fr>2015-10-25 19:58:08 (GMT)
commit2fb7c126ab1a68f237aee91ecd26b5f2eb6e074d (patch)
tree4a5690317893fad0466e0cdcfa6b87db4c5dd141 /tests/menu.test
parent72df3089578116c1b9fdfb15a1c9b1e20a66dc2a (diff)
downloadtk-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.test9
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