diff -r fcf2ecbdde67 -r 85b9b5da0b8d UIPainterView.st
--- a/UIPainterView.st	Mon Nov 13 12:14:23 2000 +0100
+++ b/UIPainterView.st	Wed Nov 15 11:35:31 2000 +0100
@@ -1756,26 +1756,22 @@
 updateSelectionFromModel:aSelOrNil
     "update selection from a new selection
     "
-    |aSet|
+    |list|
 
     selectionHiddenLevel == 0 ifTrue:[
         aSelOrNil size ~~ 0 ifTrue:[
+            list := OrderedCollection new.
+
             self selectionDo:[:el|
-                (aSelOrNil includes:el) ifFalse:[
-                    aSet isNil ifTrue:[
-                        aSet := IdentitySet new
-                    ].
-                    self showUnselected:el addAffectedViewsTo:aSet.
-                ] 
+                (aSelOrNil includes:el) ifFalse:[list add:el]
             ].
-            self handleAffectedViews:aSet.
+            self showUnselected:list.
         ] ifFalse:[
             self hideSelection.
         ]
     ].
     self setSelection:aSelOrNil withRedraw:false.
     self showSelection
-
 ! !
 
 !UIPainterView methodsFor:'specification'!
@@ -2177,22 +2173,26 @@
 spec
     "return the value of the instance variable 'spec' (automatically generated)"
 
-    ^ spec!
+    ^ spec
+!
 
 spec:something
     "set the value of the instance variable 'spec' (automatically generated)"
 
-    spec := something.!
+    spec := something.
+!
 
 view
     "return the value of the instance variable 'view' (automatically generated)"
 
-    ^ view!
+    ^ view
+!
 
 view:something
     "set the value of the instance variable 'view' (automatically generated)"
 
-    view := something.! !
+    view := something.
+! !
 
 !UIPainterView::ViewProperty methodsFor:'initialization'!