--- a/DoWhatIMeanSupport.st	Sat Nov 22 02:58:56 2008 +0100
+++ b/DoWhatIMeanSupport.st	Wed Nov 26 16:43:49 2008 +0100
@@ -212,7 +212,7 @@
 
     codeView
         undoableDo:[ codeView replaceFromCharacterPosition:start to:stop with:best ]
-        info:'completion'.
+        info:'Completion'.
 
     (best startsWith:oldVar) ifTrue:[
         oldLen := stop - start + 1.
@@ -426,7 +426,7 @@
                 codeView cursorRight.  "/ avoid going to the next line !!
                 codeView dontReplaceSelectionOnInput.
             ]
-        info:'completion'.
+        info:'Completion'.
     ].
 
     "Created: / 10-11-2006 / 13:18:27 / cg"
@@ -504,7 +504,7 @@
                             to:crsrPos 
                             with:rest 
                     ]
-                    info:'completion'.
+                    info:'Completion'.
                 codeView cursorToCharacterPosition:(crsrPos + rest size - 1).    
             ].
             codeView cursorRight. "/ kludge to make it visible   
@@ -777,7 +777,7 @@
 
     codeView
         undoableDo:[ codeView replaceFromCharacterPosition:start to:stop with:best ]
-        info:'completion'.
+        info:'Completion'.
 
     (best startsWith:oldVar) ifTrue:[
         oldLen := stop - start + 1.
@@ -1766,5 +1766,5 @@
 !DoWhatIMeanSupport class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.48 2008-11-20 20:12:28 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/DoWhatIMeanSupport.st,v 1.49 2008-11-26 15:43:49 cg Exp $'
 ! !