--- a/EditTextView.st	Sun May 12 16:31:16 1996 +0200
+++ b/EditTextView.st	Sun May 12 16:33:36 1996 +0200
@@ -1666,13 +1666,11 @@
             drawCharacterOnly := true
         ]
     ] ifFalse:[
-line storeString printNL.
         newLine := line species new:(lineSize - 1).
         newLine replaceFrom:1 to:(colNr - 1)
                        with:line startingAt:1.
         newLine replaceFrom:colNr to:(lineSize - 1)
                        with:line startingAt:(colNr + 1).
-newLine storeString printNL.
     ].
 
     newLine isBlank ifTrue:[
@@ -1689,7 +1687,7 @@
         self redrawLine:lineNr from:colNr
     ]
 
-    "Modified: 12.5.1996 / 15:57:08 / cg"
+    "Modified: 12.5.1996 / 16:33:04 / cg"
 !
 
 deleteCharsAtLine:lineNr fromCol:colNr
@@ -3773,5 +3771,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.69 1996-05-12 14:31:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.70 1996-05-12 14:33:36 cg Exp $'
 ! !