--- a/UIBuilder.st	Sat Feb 21 15:32:35 1998 +0100
+++ b/UIBuilder.st	Wed Feb 25 15:29:18 1998 +0100
@@ -144,42 +144,6 @@
     isEditing := aState
 !
 
-menuAt:aKey
-    "Find a binding for the menu named aKey, either in the bindings 
-     or from the source"
-
-    | menu |
-
-    menu := self bindingAt:aKey.
-    menu isNil ifTrue:[
-        menu := self safelyPerform:#menuFor: with:aKey.
-        menu isNil ifTrue:[
-            menu := self safelyPerform:aKey
-        ].
-        menu := menu value.
-
-        (application notNil and:[menu notNil]) ifTrue:[
-            menu isArray ifTrue:[
-                menu := Menu new fromLiteralArrayEncoding:menu.
-                menu receiver:application.
-                ^ menu
-            ].
-            menu findGuiResourcesIn:application
-        ]
-    ].
-    ^ menu
-
-    "Modified: / 30.10.1997 / 20:37:14 / cg"
-!
-
-menuAt:aSymbol put:someMenuOrHolder
-    "add someMenuOrHolder as the binding for the menu named aSymbol to the bindings"
-
-    ^ self aspectAt:aSymbol put:someMenuOrHolder
-
-    "Modified: / 30.10.1997 / 20:32:51 / cg"
-!
-
 menuBar
     "return the value of the instance variable 'menuBar' (automatically generated)"
 
@@ -383,6 +347,6 @@
 !UIBuilder class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.32 1998-02-05 12:49:55 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/UIBuilder.st,v 1.33 1998-02-25 14:29:18 ca Exp $'
 ! !
 UIBuilder initialize!