--- a/EditTextView.st	Mon Oct 19 23:51:47 2015 +0200
+++ b/EditTextView.st	Mon Oct 26 14:27:47 2015 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
               All Rights Reserved
@@ -4066,6 +4064,8 @@
                 cursorCol := startCol.
             ] ifFalse:[
                 cursorCol := cursorCol - (endCol - startCol + 1).
+                "/ self assert:(cursorCol >= 0).
+                cursorCol := cursorCol max:1.
             ]
         ].
     ].