equal
deleted
inserted
replaced
1 ObjectView subclass:#UIObjectView |
1 ObjectView subclass:#UIObjectView |
2 instanceVariableNames:'inputView enableChannel undoHistory copiedExtent copiedLayout |
2 instanceVariableNames:'saveSelection inputView enableChannel undoHistory copiedExtent |
3 actionData createClass clipChildren selectionHiddenLevel |
3 copiedLayout actionData createClass clipChildren |
4 setOfSuperViewsSizeChanged' |
4 selectionHiddenLevel setOfSuperViewsSizeChanged' |
5 classVariableNames:'' |
5 classVariableNames:'' |
6 poolDictionaries:'' |
6 poolDictionaries:'' |
7 category:'Interface-UIPainter' |
7 category:'Interface-UIPainter' |
8 ! |
8 ! |
9 |
9 |
230 |
230 |
231 enabled:aState |
231 enabled:aState |
232 "set the modification / test mode |
232 "set the modification / test mode |
233 " |
233 " |
234 (aState == enableChannel value) ifFalse:[ |
234 (aState == enableChannel value) ifFalse:[ |
|
235 aState ifFalse:[ |
|
236 saveSelection := selection copy |
|
237 ]. |
235 enableChannel value:aState. |
238 enableChannel value:aState. |
236 |
239 |
237 aState ifFalse:[ |
240 aState ifFalse:[ |
238 self unselect. |
241 self unselect. |
239 inputView unrealize |
242 inputView unrealize |
240 ] ifTrue:[ |
243 ] ifTrue:[ |
241 inputView raise. |
244 inputView raise. |
242 inputView realize |
245 inputView realize. |
243 ]. |
246 self select:saveSelection. |
244 self changed:#enabled |
247 ] |
245 ] |
248 ] |
246 |
249 |
247 |
250 |
248 |
251 |
249 ! |
252 ! |