author | Claus Gittinger <cg@exept.de> |
Wed, 26 Feb 2020 17:18:29 +0100 | |
changeset 4455 | 93ed941728ff |
parent 4454 | 8696125a362f |
child 4456 | e059fcc5f0b3 |
--- a/Menu.st Wed Feb 26 17:05:40 2020 +0100 +++ b/Menu.st Wed Feb 26 17:18:29 2020 +0100 @@ -411,14 +411,14 @@ "Modified: / 30-06-2011 / 10:51:50 / cg" ! -menuItemWithKey:aValue +menuItemWithKey:aNameKey "return the menuItem for the given key; nil if no such item is in the menu. Searches all items (i.e. also submenu items)" self allItemsDo:[:anItem | - (anItem nameKey = aValue) ifTrue:[ + (anItem nameKey = aNameKey) ifTrue:[ ^ anItem ]. ].