--- a/SmallSense__ClassPO.st	Fri Aug 08 13:26:47 2014 +0100
+++ b/SmallSense__ClassPO.st	Sun Aug 10 23:57:43 2014 +0100
@@ -132,25 +132,25 @@
     "Answers a string already written in the textview"
 
     klass isJavaClass ifTrue:[
-	context language isSmalltalk ifTrue:[
-	    | rec |
+        context language isSmalltalk ifTrue:[
+            | rec |
 
-	    rec := context node .
-	    [ rec isUnaryMessage ] whileTrue:[
-		rec := rec receiver.
-	    ].
-	    (rec isVariableNode and:['JAVA' startsWith: rec name]) ifTrue:[
-		^ context codeView contents asString copyFrom: rec startPosition to: context node endPosition
-	    ].
-	] ifFalse:[
-	context language isJavaLike ifTrue:[
-	     ^ context wordBeforeCursorConsisitingOfCharactersMatching:[:c | c isAlphaNumeric or:['$_.' includes: c] ]
-	]].
+            rec := context node .
+            [ rec isUnaryMessage ] whileTrue:[
+                rec := rec receiver.
+            ].
+            (rec isVariableNode and:['JAVA' startsWith: rec name]) ifTrue:[
+                ^ context codeView contents string copyFrom: rec startPosition to: context node endPosition
+            ].
+        ] ifFalse:[
+        context language isJavaLike ifTrue:[
+             ^ context wordBeforeCursorConsisitingOfCharactersMatching:[:c | c isAlphaNumeric or:['$_.' includes: c] ]
+        ]].
     ].
     ^ super stringAlreadyWritten
 
     "Created: / 20-10-2013 / 02:46:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 15-05-2014 / 07:31:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 08-08-2014 / 16:23:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 stringToCompleteForLanguage: language