equal
deleted
inserted
replaced
1754 ! |
1754 ! |
1755 |
1755 |
1756 updateSelectionFromModel:aSelOrNil |
1756 updateSelectionFromModel:aSelOrNil |
1757 "update selection from a new selection |
1757 "update selection from a new selection |
1758 " |
1758 " |
1759 |aSet| |
1759 |list| |
1760 |
1760 |
1761 selectionHiddenLevel == 0 ifTrue:[ |
1761 selectionHiddenLevel == 0 ifTrue:[ |
1762 aSelOrNil size ~~ 0 ifTrue:[ |
1762 aSelOrNil size ~~ 0 ifTrue:[ |
|
1763 list := OrderedCollection new. |
|
1764 |
1763 self selectionDo:[:el| |
1765 self selectionDo:[:el| |
1764 (aSelOrNil includes:el) ifFalse:[ |
1766 (aSelOrNil includes:el) ifFalse:[list add:el] |
1765 aSet isNil ifTrue:[ |
|
1766 aSet := IdentitySet new |
|
1767 ]. |
|
1768 self showUnselected:el addAffectedViewsTo:aSet. |
|
1769 ] |
|
1770 ]. |
1767 ]. |
1771 self handleAffectedViews:aSet. |
1768 self showUnselected:list. |
1772 ] ifFalse:[ |
1769 ] ifFalse:[ |
1773 self hideSelection. |
1770 self hideSelection. |
1774 ] |
1771 ] |
1775 ]. |
1772 ]. |
1776 self setSelection:aSelOrNil withRedraw:false. |
1773 self setSelection:aSelOrNil withRedraw:false. |
1777 self showSelection |
1774 self showSelection |
1778 |
|
1779 ! ! |
1775 ! ! |
1780 |
1776 |
1781 !UIPainterView methodsFor:'specification'! |
1777 !UIPainterView methodsFor:'specification'! |
1782 |
1778 |
1783 addSpec:aSpecification builder:aBuilder in:aFrame |
1779 addSpec:aSpecification builder:aBuilder in:aFrame |
2175 ! |
2171 ! |
2176 |
2172 |
2177 spec |
2173 spec |
2178 "return the value of the instance variable 'spec' (automatically generated)" |
2174 "return the value of the instance variable 'spec' (automatically generated)" |
2179 |
2175 |
2180 ^ spec! |
2176 ^ spec |
|
2177 ! |
2181 |
2178 |
2182 spec:something |
2179 spec:something |
2183 "set the value of the instance variable 'spec' (automatically generated)" |
2180 "set the value of the instance variable 'spec' (automatically generated)" |
2184 |
2181 |
2185 spec := something.! |
2182 spec := something. |
|
2183 ! |
2186 |
2184 |
2187 view |
2185 view |
2188 "return the value of the instance variable 'view' (automatically generated)" |
2186 "return the value of the instance variable 'view' (automatically generated)" |
2189 |
2187 |
2190 ^ view! |
2188 ^ view |
|
2189 ! |
2191 |
2190 |
2192 view:something |
2191 view:something |
2193 "set the value of the instance variable 'view' (automatically generated)" |
2192 "set the value of the instance variable 'view' (automatically generated)" |
2194 |
2193 |
2195 view := something.! ! |
2194 view := something. |
|
2195 ! ! |
2196 |
2196 |
2197 !UIPainterView::ViewProperty methodsFor:'initialization'! |
2197 !UIPainterView::ViewProperty methodsFor:'initialization'! |
2198 |
2198 |
2199 initialize |
2199 initialize |
2200 super initialize. |
2200 super initialize. |