--- a/EditTextView.st	Fri Apr 13 12:18:33 2007 +0200
+++ b/EditTextView.st	Fri Apr 13 12:19:00 2007 +0200
@@ -3936,9 +3936,14 @@
     |originalLine|
 
     originalLine := self listAt:lineNr.
+    originalLine isNil ifTrue:[
+        self checkForExistingLine:lineNr
+    ].
     self list at:lineNr put:newText.
     self addUndo:(ReplaceLine line:lineNr string:originalLine info:'replace').
     self invalidateLine:lineNr.
+
+    "Modified: / 12-04-2007 / 09:31:33 / cg"
 !
 
 replaceString:aString atLine:lineNr col:colNr
@@ -7091,5 +7096,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.414 2007-03-30 12:08:27 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.415 2007-04-13 10:19:00 cg Exp $'
 ! !