'From Squeak3.2alpha of 2 October 2001 [latest update: #4526] on 19 November 2001 at 10:53:26 pm'! "Change Set: SketchResizeFix-ar Date: 19 November 2001 Author: Andreas Raab Fixes a problem with resizing sketch morphs that use interpolation."! !SketchMorph methodsFor: 'drawing' stamp: 'ar 11/19/2001 22:52'! generateInterpolatedForm "Draw the given form onto the canvas using the Balloon 3D engine" | aCanvas extent | extent _ (originalForm extent * scalePoint) asIntegerPoint. rotatedForm _ Form extent: extent asIntegerPoint depth: originalForm depth. aCanvas _ rotatedForm getCanvas. ^self drawInterpolatedImage: originalForm on: aCanvas! !