equal
deleted
inserted
replaced
520 ^ false. |
520 ^ false. |
521 |
521 |
522 |
522 |
523 ! |
523 ! |
524 |
524 |
|
525 redrawX:nx y:ny width:nw height:nh |
|
526 "ignore redraws - my components redraw themself |
|
527 " |
|
528 ! |
|
529 |
525 sizeChanged:how |
530 sizeChanged:how |
526 "size of a view(s) changed |
531 "size of a view(s) changed |
527 " |
532 " |
528 self withSelectionHiddenDo:[ |
533 self withSelectionHiddenDo:[ |
529 super sizeChanged:how |
534 super sizeChanged:how |
623 ifFalse:[^ nil] |
628 ifFalse:[^ nil] |
624 ]. |
629 ]. |
625 ^ setOfViews select:[:aView| |
630 ^ setOfViews select:[:aView| |
626 (setOfViews detect:[:v|aView isComponentOf:v] ifNone:nil) isNil |
631 (setOfViews detect:[:v|aView isComponentOf:v] ifNone:nil) isNil |
627 ] |
632 ] |
|
633 ! |
|
634 |
|
635 redrawObjectsInVisible:redrawFrame |
|
636 "my objects are views - they redraw themself" |
|
637 |
|
638 ^ self |
|
639 |
628 ! |
640 ! |
629 |
641 |
630 setDefaultActions |
642 setDefaultActions |
631 "set default actions |
643 "set default actions |
632 " |
644 " |