--- a/MenuEditor.st	Tue Oct 20 10:38:40 2009 +0200
+++ b/MenuEditor.st	Tue Oct 20 10:41:17 2009 +0200
@@ -2617,7 +2617,7 @@
         ^ self
     ].
 
-    (cls implements:selector) ifFalse:[
+    (cls includesSelector:selector) ifFalse:[
         category := UserPreferences current categoryForMenuActionsMethods.
 
         CodeGeneratorTool