summaryrefslogtreecommitdiffstats
path: root/tests/menu.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-21 10:09:01 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-09-21 10:09:01 (GMT)
commit220460c737b212c39bb974c53980e5f122d7475d (patch)
tree576997d4fc7f75d7e6af6ef52b7c3cdaf6442e5f /tests/menu.test
parent29554712ff73fd5e9cde2ce2bdba693da86961e0 (diff)
downloadtk-220460c737b212c39bb974c53980e5f122d7475d.zip
tk-220460c737b212c39bb974c53980e5f122d7475d.tar.gz
tk-220460c737b212c39bb974c53980e5f122d7475d.tar.bz2
Fix [f3cd942e9e]: trunk: .mymenu index end no longer works on an empty menu
Diffstat (limited to 'tests/menu.test')
-rw-r--r--tests/menu.test8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/menu.test b/tests/menu.test
index 03e0dab..55315bd 100644
--- a/tests/menu.test
+++ b/tests/menu.test
@@ -1858,6 +1858,14 @@ test menu-3.70 {MenuWidgetCmd procedure, "xposition" option} -setup {
} -cleanup {
destroy .m1
} -result {}
+test menu-3.71 {MenuWidgetCmd procedure, "index end" option, bug [f3cd942e9e]} -setup {
+ destroy .m1
+} -body {
+ menu .m1
+ list [.m1 index "end"]
+} -cleanup {
+ destroy .m1
+} -result none
test menu-4.1 {TkInvokeMenu: disabled} -setup {