--- a/WorkspaceCompletionSupport.st	Mon May 09 21:43:19 2016 +0200
+++ b/WorkspaceCompletionSupport.st	Wed May 11 09:39:07 2016 +0200
@@ -86,7 +86,7 @@
         numLast := 5.
         numSkipped := suggestions size-numShown.    
         suggestions := (suggestions copyTo:numShown-5) 
-                        , { ('<< %1 more skipped >>' bindWith:numSkipped) colorizeAllWith:Color grey }  
+                        , { ('<< %1 more skipped >>' bindWith:numSkipped) withColor:Color grey }  
                         , (suggestions copyLast:5).
         implementations isArray ifTrue:[ 
             implementations := (implementations copyTo:numShown-5),#(nil),(implementations copyLast:5).
@@ -117,7 +117,7 @@
                     suggestions isEmpty ifFalse:[ suggestions := suggestions copyWith: '-' ]. 
                     suggestions := suggestions copyWith: ( '%1 %2'
                                             bindWith:(sniplet asStringCollection first "contractTo:25")
-                                            with: ( ('("',abbrev,'" snippet)') colorizeAllWith:Color gray)).
+                                            with: ( ('("',abbrev,'" snippet)') withColor:Color gray)).
                     indexOfSnippet := suggestions size.
 
                     "/ change below, when reversing the order in above code