--- a/SmallSense__PO.st	Wed Feb 26 19:24:50 2014 +0100
+++ b/SmallSense__PO.st	Wed Feb 26 19:28:14 2014 +0100
@@ -151,22 +151,24 @@
     stringToInsert := stringToComplete copyFrom: (stringAlreadyWritten size + 1).
     textView isCodeView2 ifTrue:[textView := textView textView].
     (stringToComplete startsWith: stringAlreadyWritten) ifTrue:[
-        context support electricInsert:stringToInsert
-              ignoreKeystrokes:stringToInsert
+        context support 
+                electricInsert:stringToInsert
+                ignoreKeystrokes:stringToInsert.
+        textView cursorCol: textView cursorCol - stringToComplete size + (po cursorColumnAfterCompleteForLanguage: context language).
     ] ifFalse:[
+       | startCol endCol |
        textView undoableDo:[
-            | startCol endCol |
-
             endCol := textView cursorCol - 1.
             startCol := textView cursorCol - stringAlreadyWritten size.
             textView insertStringAtCursor: stringToComplete.
             textView deleteFromLine:textView cursorLine col: startCol toLine:textView cursorLine col:endCol.
         ].
+        textView cursorCol: startCol + (po cursorColumnAfterCompleteForLanguage: context language).
+
     ].
-    textView cursorCol: textView cursorCol - stringToComplete size + (po cursorColumnAfterCompleteForLanguage: context language).
 
     "Created: / 17-10-2013 / 01:08:13 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 21-01-2014 / 23:30:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 16-02-2014 / 00:02:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !PO methodsFor:'displaying'!