--- a/ListModelView.st	Tue Jun 02 15:56:52 2009 +0200
+++ b/ListModelView.st	Mon Jun 08 18:50:58 2009 +0200
@@ -519,9 +519,10 @@
         "/
         "/ no longer synchronized
         "/
-        ^ self lostSynchronisation
+        self lostSynchronisation.
+        ^ self
     ].
-    newLines := startOfLinesY copy.
+    newLines := startOfLinesY. "/ copy.
     newLines addAll:(Array new:nLines) beforeIndex:start + 1.
     absY0 := newLines at:start.
     absY1 := absY0.
@@ -552,7 +553,8 @@
     ].
 
     (visY0 >= maxHg or:[visY1 <= margin]) ifTrue:[
-        ^ self contentsChanged
+        self contentsChanged.
+        ^ self
     ].
     visY0 := visY0 max:margin.
     visY1 := visY1 min:maxHg.
@@ -563,7 +565,8 @@
                                   width:width 
                                  height:height - visY0).
 
-        ^ self contentsChanged.
+        self contentsChanged.
+        ^ self
     ].
 
     (start == self size or:[(cpyHg := maxHg - visY1) < 20]) ifTrue:[
@@ -627,7 +630,7 @@
     absY1 := self yAbsoluteOfLine:stop + 1.
     dltY  := absY1 - absY0.
 
-    newLines := startOfLinesY copy.
+    newLines := startOfLinesY. "/ copy.
     newLines removeFromIndex:(start + 1) toIndex:(stop + 1).
 
     (start + 1) to:newSz do:[:i|
@@ -1886,7 +1889,7 @@
 !ListModelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.110 2008-10-26 20:13:07 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/ListModelView.st,v 1.111 2009-06-08 16:50:58 ca Exp $'
 ! !
 
 ListModelView initialize!