--- a/MenuEditor.st Tue Feb 03 23:41:20 1998 +0100
+++ b/MenuEditor.st Wed Feb 04 12:44:36 1998 +0100
@@ -2084,7 +2084,7 @@
menu := treeView asMenu.
menu isNil ifTrue:[
- ^ self information:'No menu defined.'
+ ^ self information:'No menu defined!!'
].
menu := menu literalArrayEncoding.
spec := WriteStream on:String new.
@@ -2093,7 +2093,7 @@
"/ if that method already exists, do not overwrite the category
- category := 'interface specs'.
+ category := 'menu specs'.
(mthd := cls class compiledMethodAt:selector) notNil ifTrue:[
category := mthd category.
].