--- 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'!