--- a/DoWhatIMeanSupport.st	Mon Mar 13 11:27:04 2017 +0100
+++ b/DoWhatIMeanSupport.st	Mon Mar 13 18:12:27 2017 +0100
@@ -3883,12 +3883,12 @@
         ].
     ].
     bestSelectors := Set new.
-    srchClasses isEmptyOrNil ifTrue:[
+    (srchClasses isEmptyOrNil or:[srchClasses size > 100]) ifTrue:[
         bestSelectors addAll:( Parser findBest:50 selectorsFor:selector in:nil forCompletion:true ).
         Verbose == true ifTrue:[
             Transcript show:'bestSelectors (1): '; showCR:bestSelectors.
         ].
-    ] ifFalse:[    
+    ] ifFalse:[          
         srchClasses do:[:srchClass |
             |bestForThisClass|
 
@@ -3907,6 +3907,8 @@
     bestSelectors remove:selector ifAbsent:[].
     bestSelectors := bestSelectors asOrderedCollection.
     ^ bestSelectors
+
+    "Modified: / 13-03-2017 / 18:07:28 / cg"
 !
 
 findNodeForInterval:interval in:source