--- a/SmallSense__CompletionEngine.st	Mon Oct 14 15:14:48 2013 +0100
+++ b/SmallSense__CompletionEngine.st	Wed Oct 16 15:44:43 2013 +0100
@@ -73,7 +73,9 @@
                     | classes |
 
                     classes := selectors at: selector ifAbsentPut:[ Set new ].
-                    classes add: mthd mclass.
+                    (classes includes: mthd mclass) ifFalse:[
+                        classes add: mthd mclass.
+                    ].
                 ].
             ]
         ].
@@ -87,5 +89,6 @@
     ]
 
     "Created: / 03-10-2013 / 17:56:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 16-10-2013 / 15:35:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !