equal
deleted
inserted
replaced
696 |
696 |
697 (point x > 0 and:[point y > 0]) ifTrue:[ |
697 (point x > 0 and:[point y > 0]) ifTrue:[ |
698 point := point + extent. |
698 point := point + extent. |
699 (point x < rootView width and:[point y < rootView height]) ifTrue:[ |
699 (point x < rootView width and:[point y < rootView height]) ifTrue:[ |
700 aView topView raise. |
700 aView topView raise. |
701 device sync. |
701 device flush. |
702 aView invalidate. |
702 aView invalidate. |
703 aView windowGroup processExposeEvents. |
703 aView windowGroup processExposeEvents. |
704 displayObject := Image fromView:aView grab:false. |
704 displayObject := Image fromView:aView grab:false. |
705 ] |
705 ] |
706 ]. |
706 ]. |