added #at:basicPut: to access a line without change notification.
--- a/ETxtView.st Thu May 06 17:09:57 1999 +0200
+++ b/ETxtView.st Fri May 07 09:24:43 1999 +0200
@@ -620,6 +620,14 @@
"Modified: / 30.1.1998 / 14:20:15 / cg"
!
+at:lineNr basicPut:aLine
+ "change a line without change notification"
+
+ (self at:lineNr) = aLine ifFalse:[
+ super at:lineNr put:aLine.
+ ].
+!
+
at:lineNr put:aLine
(self at:lineNr) = aLine ifFalse:[
super at:lineNr put:aLine.
@@ -4611,5 +4619,5 @@
!EditTextView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.204 1999-05-05 13:10:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.205 1999-05-07 07:24:43 cg Exp $'
! !
--- a/EditTextView.st Thu May 06 17:09:57 1999 +0200
+++ b/EditTextView.st Fri May 07 09:24:43 1999 +0200
@@ -620,6 +620,14 @@
"Modified: / 30.1.1998 / 14:20:15 / cg"
!
+at:lineNr basicPut:aLine
+ "change a line without change notification"
+
+ (self at:lineNr) = aLine ifFalse:[
+ super at:lineNr put:aLine.
+ ].
+!
+
at:lineNr put:aLine
(self at:lineNr) = aLine ifFalse:[
super at:lineNr put:aLine.
@@ -4611,5 +4619,5 @@
!EditTextView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.204 1999-05-05 13:10:09 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.205 1999-05-07 07:24:43 cg Exp $'
! !