--- a/Workspace.st	Fri May 07 09:24:43 1999 +0200
+++ b/Workspace.st	Fri May 07 09:25:17 1999 +0200
@@ -382,7 +382,7 @@
         ] ifFalse:[
             l := opening , l , closing
         ].
-        self at:lineNr put:l
+        self at:lineNr basicPut:l
     ].
     self textChanged.
 
@@ -455,7 +455,7 @@
                     l := l copyWithoutLast:closing size.
                 ]
             ].
-            self at:lineNr put:l
+            self at:lineNr basicPut:l
         ]
     ].
     self textChanged.
@@ -850,5 +850,5 @@
 !Workspace class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.66 1999-05-06 15:09:57 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Workspace.st,v 1.67 1999-05-07 07:25:17 cg Exp $'
 ! !