equal
deleted
inserted
replaced
894 ] |
894 ] |
895 ] |
895 ] |
896 ]. |
896 ]. |
897 |
897 |
898 clickedView := self findObjectAt:aPoint. |
898 clickedView := self findObjectAt:aPoint. |
899 (clickedView notNil |
899 clickedView notNil ifTrue:[ |
900 and:[clickedView isComponentOf:selectedView]) ifTrue:[ |
900 (clickedView isComponentOf:selectedView) ifTrue:[ |
901 self unselect. |
901 self unselect. |
902 selectedView := nil. |
902 selectedView := nil. |
903 viewOperatedUpon := nil |
903 viewOperatedUpon := nil |
|
904 ] ifFalse:[ |
|
905 self unselect. |
|
906 selectedView := nil. |
|
907 viewOperatedUpon := clickedView |
|
908 ]. |
904 ]. |
909 ]. |
905 |
910 |
906 viewOperatedUpon isNil ifTrue:[ |
911 viewOperatedUpon isNil ifTrue:[ |
907 clickedView isNil ifTrue:[ |
912 clickedView isNil ifTrue:[ |
908 self select:nil. |
913 self select:nil. |