--- a/UIPainterView.st Wed Apr 08 01:25:23 1998 +0200
+++ b/UIPainterView.st Wed Apr 08 13:16:21 1998 +0200
@@ -1247,11 +1247,21 @@
updateSelectionFromModel:aSelOrNil
"update selection from a new selection
"
+ |aSet|
+
selectionHiddenLevel == 0 ifTrue:[
aSelOrNil size ~~ 0 ifTrue:[
- self selectionDo:[:el| (aSelOrNil includes:el) ifFalse:[self showUnselected:el] ]
+ self selectionDo:[:el|
+ (aSelOrNil includes:el) ifFalse:[
+ aSet isNil ifTrue:[
+ aSet := IdentitySet new
+ ].
+ self showUnselected:el addAffectedViewsTo:aSet.
+ ]
+ ].
+ self handleAffectedViews:aSet.
] ifFalse:[
- self selectionDo:[:el| self showUnselected:el ]
+ self hideSelection.
]
].
self setSelection:aSelOrNil withRedraw:false.