equal
deleted
inserted
replaced
593 ] |
593 ] |
594 ]. |
594 ]. |
595 damages add:handle |
595 damages add:handle |
596 ] |
596 ] |
597 ]. |
597 ]. |
598 rootView clippedByChildren:false. |
598 "/ rootView clippedByChildren:false. |
599 |
599 |
600 damages do:[:el| |
600 damages do:[:el| |
601 x := el left. |
601 x := el left. |
602 y := el top. |
602 y := el top. |
603 w := el width. |
603 w := el width. |
604 h := el height. |
604 h := el height. |
605 |
605 |
606 rootView clearRectangleX:x y:y width:w height:h. |
606 rootView clearRectangleX:x y:y width:w height:h. |
607 rootView exposeX:x y:y width:w height:h. |
607 rootView exposeX:x y:y width:w height:h. |
608 ]. |
608 ]. |
609 rootView clippedByChildren:true. |
609 "/ rootView clippedByChildren:true. |
610 |
610 |
611 (subViews := rootView subViews) notNil ifTrue:[ |
611 (subViews := rootView subViews) notNil ifTrue:[ |
612 subViews reverseDo:[:v| self recursiveRepair:damages startIn:v relativeTo:rootView ]. |
612 subViews reverseDo:[:v| self recursiveRepair:damages startIn:v relativeTo:rootView ]. |
613 ]. |
613 ]. |
614 ]. |
614 ]. |