# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1309422635 -7200
# Node ID ff96b6187a5fe4bed9f4298c6885f1e7fe58a854
# Parent  d3cfaa2c26c23dc2ae0ce67ff1a57aeb9a005e52
added: #atMenuItemLabeled:putSubmenu:visible:

diff -r d3cfaa2c26c2 -r ff96b6187a5f Menu.st
--- a/Menu.st	Wed Jun 29 19:18:11 2011 +0200
+++ b/Menu.st	Thu Jun 30 10:30:35 2011 +0200
@@ -215,6 +215,14 @@
 
 !Menu methodsFor:'accessing'!
 
+atMenuItemLabeled:aString putSubmenu:aMenu visible:visible
+    (self menuItemLabeled:aString)
+        subMenu:aMenu;
+        visible:visible
+
+    "Created: / 30-06-2011 / 10:30:22 / cg"
+!
+
 atNameKey:aNameKey
     "return the menuItem for the given nameKey; nil if no such item is in the menu.
      Searches in allItems (i.e. also in subMenus)"
@@ -1202,10 +1210,6 @@
 
 !Menu class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.78 2011-04-19 13:16:00 cg Exp $'
-!
-
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.78 2011-04-19 13:16:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Menu.st,v 1.79 2011-06-30 08:30:35 cg Exp $'
 ! !