equal
deleted
inserted
replaced
293 newSelection := self. |
293 newSelection := self. |
294 ] ifFalse:[ |
294 ] ifFalse:[ |
295 viewsToRemove size == 1 ifTrue:[ |
295 viewsToRemove size == 1 ifTrue:[ |
296 |subviews index| |
296 |subviews index| |
297 |
297 |
298 newSelection components notEmptyOrNil ifTrue:[ self halt ]. |
298 "/ newSelection components notEmptyOrNil ifTrue:[ self halt ]. |
299 subviews := newSelection subViews. |
299 subviews := newSelection subViews. |
300 |
300 |
301 subviews size > 1 ifTrue:[ |
301 subviews size > 1 ifTrue:[ |
302 index := subviews findFirst:[:eachView| eachView isSameOrComponentOf:firstView ]. |
302 index := subviews findFirst:[:eachView| eachView isSameOrComponentOf:firstView ]. |
303 index > 0 ifTrue:[ |
303 index > 0 ifTrue:[ |