'From etoys2.1 of 26 July 2007 [latest update: #1568] on 29 August 2007 at 6:23:19 pm'!
"Change Set:		OLPCDisplayCopy-yo
Date:			29 August 2007
Author:			Yoshiki Ohshima

Copy shouldn't be made for the display."!


!OLPCVirtualScreen methodsFor: 'copying' stamp: 'yo 8/29/2007 18:20'!
copy: aRect
 	"Return a new form which derives from the portion of the original form delineated by aRect."
	| newForm |
	newForm _ DisplayScreen extent: aRect extent depth: depth.
	^ newForm copyBits: aRect from: self at: 0@0
		clippingBox: newForm boundingBox rule: Form over fillColor: nil! !