--- a/EditTextView.st	Sat Jul 15 16:42:33 2000 +0200
+++ b/EditTextView.st	Tue Jul 18 11:20:26 2000 +0200
@@ -950,12 +950,15 @@
      ignore updates from my own change
     "
     lockUpdates ifTrue:[
-	lockUpdates := false.
-	^ self
+        lockUpdates := false.
+        ^ self
     ].
-    ^ super getListFromModel
-
-    "Modified: 29.4.1996 / 12:42:33 / cg"
+    super getListFromModel.
+
+    "/ validate the cursorLine
+    cursorLine > list size ifTrue:[
+        self cursorLine:list size + 1 col:1
+    ].
 !
 
 update:something with:aParameter from:changedObject
@@ -4884,5 +4887,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.234 2000-05-04 10:47:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.235 2000-07-18 09:20:26 cg Exp $'
 ! !