--- a/SmallSense__SmalltalkCompletionEngine.st	Thu May 22 16:15:30 2014 +0100
+++ b/SmallSense__SmalltalkCompletionEngine.st	Fri May 23 12:58:31 2014 +0100
@@ -382,10 +382,10 @@
     class isNil ifTrue:[
         class := UndefinedObject.
     ].
-    ^ self complete: codeView codeAspect source: codeView contents class: class line: codeView cursorLine column: codeView cursorCol
+    ^ self complete: codeView codeAspect source: codeView contents string class: class line: codeView cursorLine column: codeView cursorCol
 
     "Created: / 02-10-2013 / 13:32:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 21-01-2014 / 23:20:17 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 22-05-2014 / 17:00:59 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 complete: mode source: source class: class line: lineNrArg column: colNrArg