--- a/SmallSenseService.st	Tue Aug 06 12:32:59 2013 +0100
+++ b/SmallSenseService.st	Wed Aug 07 01:59:17 2013 +0100
@@ -384,7 +384,9 @@
      Ask JV what the args means if unsure (I'm lazy to document
      them, now it is just an experiment...)"
 
-    | annotation |        
+    | lang annotation |
+
+    ((lang := codeView language) isNil or:[lang isSmalltalk not]) ifTrue:[ ^ self ].
 
     annotation :=  self annotationAtLine: lineNo.
     annotation notNil ifTrue:[
@@ -393,6 +395,7 @@
     ].
 
     "Created: / 30-01-2012 / 15:11:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 07-08-2013 / 00:19:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !SmallSenseService class methodsFor:'documentation'!