--- a/VariableArray.st	Thu Jun 02 13:35:26 1994 +0200
+++ b/VariableArray.st	Thu Jun 02 13:36:39 1994 +0200
@@ -26,7 +26,7 @@
 fixed in size - this may change in the future.
 (make Array be FixedArray, and this one named Array
 
-$Header: /cvs/stx/stx/libbasic2/VariableArray.st,v 1.4 1993-10-13 02:14:28 claus Exp $
+$Header: /cvs/stx/stx/libbasic2/VariableArray.st,v 1.5 1994-06-02 11:36:29 claus Exp $
 '!
 
 !VariableArray class methodsFor:'instance creation'!
@@ -109,7 +109,8 @@
     ].
     (col isMemberOf:Array) ifTrue:[
         (stop <= tally) ifTrue:[
-            ^ contentsArray replaceFrom:start to:stop with:col startingAt:repStart
+            contentsArray replaceFrom:start to:stop with:col startingAt:repStart.
+	    ^ self
         ]
     ].
     ^ super replaceFrom:start to:stop with:aCollection startingAt:repStart