--- 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
"