--- a/SmallSense__CompletionView.st	Mon Aug 11 21:30:19 2014 +0100
+++ b/SmallSense__CompletionView.st	Wed Aug 13 10:28:35 2014 +0100
@@ -62,13 +62,13 @@
 
     completionContext := aCompletionContext.
     node := completionContext node.
-    (node notNil and:[node isMessage]) ifTrue:[ 
+    (node notNil and:[node askFor:#isMessage]) ifTrue:[ 
         helpHolder value: 'Receiver type: ', node receiver inferedType displayString
     ] ifFalse:[ 
         helpHolder value: 'Up/Down to select, Enter to paste' asText.
     ].
 
-    "Modified: / 09-04-2014 / 12:59:11 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 12-08-2014 / 10:54:46 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 completionController