MenuEditor.st
changeset 509 3d42fb6ec7b0
parent 508 968c6aa88ef0
child 520 f6ca67d537b6
--- a/MenuEditor.st	Wed Jan 28 19:10:17 1998 +0100
+++ b/MenuEditor.st	Wed Jan 28 19:49:45 1998 +0100
@@ -100,31 +100,6 @@
 
 !MenuEditor class methodsFor:'code generation'!
 
-generateCodeFor:aClass menuSelector:aSelector
-
-    |code category|
-
-    category := self sourceCategory.
-
-    code := Character excla asString 
-            , aClass name , ' methodsFor:' , category storeString
-            , Character excla asString , '\\'
-
-            , aSelector , '\'
-            , '    "this window spec was automatically generated by the UI Builder"\\'
-            , '    ^ self class ', aSelector, '\\'
-            , '\'
-            , Character excla asString
-            , ' '
-            , Character excla asString
-            , '\\'.
-    ^ code
-
-"
-self generateCodeFor:MenuEditor menuSelector:#menu
-"
-!
-
 sourceCategory
     "returns the category where to install the menu
     "