--- a/SmallSense__CompletionEngine.st	Tue Jan 16 22:25:41 2018 +0100
+++ b/SmallSense__CompletionEngine.st	Thu Mar 08 11:23:06 2018 +0100
@@ -161,12 +161,7 @@
                     class := class superclass.
                 ].
                 overridden ifFalse:[
-                    | classes |
-
-                    classes := selectors at: selector ifAbsentPut:[ Set new ].
-                    (classes includes: mthd mclass) ifFalse:[
-                        classes add: mthd mclass.
-                    ].
+                    (selectors at: selector ifAbsentPut:[Set new]) add: mthd mclass.
                 ].
             ]
     ].
@@ -175,10 +170,10 @@
     selectors keysAndValuesDo: [:selector :classes |
         result add:(PO forClasses: classes selector: selector prefix: stripoffPrefix)
     ].
-    ^ self
 
     "Created: / 08-04-2014 / 21:34:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 23-05-2014 / 11:54:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 08-03-2018 / 11:22:59 / stefan"
 ! !
 
 !CompletionEngine methodsFor:'completion-private'!