--- a/DoWhatIMeanSupport.st	Sat Jan 21 15:39:03 2017 +0100
+++ b/DoWhatIMeanSupport.st	Tue Jan 24 12:24:19 2017 +0100
@@ -2308,7 +2308,7 @@
         ].
     ].
  
-    allBest := (bestSelectors ? #()) , (bestSelectors2 ? #()).
+    allBest := (bestSelectors ? #()) , (bestSelectors2 ? #()) asOrderedCollection.
     self sortSelectors:allBest forSelector:selector lcSelector:lcSelector.
                         
     "/ sort: prefixes first.
@@ -2330,8 +2330,7 @@
                 (mSel startsWith:selector) ifTrue:[
                     "/ already the word before the cursor?
                     (mSel ~= selector) ifTrue:[
-                        allBest remove:mSel ifAbsent:[].
-                        allBest addFirst:mSel.
+                        allBest removeAndAddFirst:mSel.
                     ]
                 ]
             ]