--- a/SmallSense__MethodPO.st	Tue May 20 11:01:39 2014 +0100
+++ b/SmallSense__MethodPO.st	Tue May 20 11:50:16 2014 +0100
@@ -15,10 +15,11 @@
 cursorColumnAfterComplete
 
     | idx |
-    idx := name indexOf: $:.
-    ^idx == 0 ifTrue:[name size + 1] ifFalse:[idx + 1].
+    idx := self label indexOf: $:.
+    ^idx == 0 ifTrue:[self label size + 1] ifFalse:[idx + 1].
 
     "Created: / 05-04-2011 / 17:08:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-05-2014 / 11:43:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 cursorColumnAfterCompleteForLanguage: language
@@ -116,10 +117,10 @@
 
 initializeWithClasses: anArray"Of Classes" selector: aSymbol 
     selector := aSymbol.
-    name := aSymbol.
     classes := anArray
 
     "Created: / 20-05-2014 / 10:32:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-05-2014 / 11:34:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !MethodPO methodsFor:'testing'!