--- a/ListView.st	Tue Feb 18 20:31:04 1997 +0100
+++ b/ListView.st	Wed Feb 19 13:12:13 1997 +0100
@@ -1718,25 +1718,27 @@
     |text msg|
 
     model notNil ifTrue:[
-	msg := listMsg.
-	msg isNil ifTrue:[
-	    msg := aspectMsg
-	].
-
-
-	msg notNil ifTrue:[
-	    text := model perform:msg.
-	    text notNil ifTrue:[
-		text := text asStringCollection.
-	    ].
-	    text ~~ list ifTrue:[
-		self list:text
-	    ].
-	].
+        msg := listMsg.
+        msg isNil ifTrue:[
+            msg := aspectMsg
+        ].
+
+
+        msg notNil ifTrue:[
+            text := model perform:msg.
+            text notNil ifTrue:[
+                text := text asStringCollection.
+            ].
+"/ SV: this does not work, if model uses (i.e. updates) the same stringCollection
+"/ as the view!!
+"/            text ~= list ifTrue:[
+                self list:text
+"/            ].
+        ].
     ].
 
     "Modified: 26.4.1996 / 14:09:42 / cg"
-    "Modified: 15.8.1996 / 13:06:02 / stefan"
+    "Modified: 19.2.1997 / 12:08:50 / stefan"
 !
 
 lineOfCharacterPosition:charPos
@@ -3511,5 +3513,5 @@
 !ListView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.123 1997-02-08 14:24:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ListView.st,v 1.124 1997-02-19 12:12:13 stefan Exp $'
 ! !