SmallSense__EditSupport.st
changeset 139 bf1538a4e7ce
parent 137 12232e62cf54
child 144 a43236d0c411
--- a/SmallSense__EditSupport.st	Tue Oct 22 17:29:00 2013 +0100
+++ b/SmallSense__EditSupport.st	Fri Oct 25 19:28:00 2013 +0100
@@ -209,13 +209,13 @@
 
     line := service textView listAt: service textView cursorLine.
     ^ line isNil ifTrue:[
-        service textView cursorCol - 1.
+        (service textView cursorCol - 1) max: 0.
     ] ifFalse:[
-        line indexOfNonSeparator - 1.
+        (line indexOfNonSeparator - 1) max: 0.
     ]
 
     "Created: / 25-07-2013 / 00:13:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 04-08-2013 / 02:13:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 25-10-2013 / 18:04:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 wordBeforeCursor