'From etoys3.0 of 24 February 2008 [latest update: #2059] on 21 July 2008 at 10:18:39 pm'!
"Change Set:		movecenter
Date:			21 July 2008
Author:			kks

<your descriptive text goes here>"!


!HaloMorph methodsFor: 'private' stamp: 'kks 7/19/2008 22:55'!
prepareToTrackCenterOfRotation: evt with: rotationHandle
	evt hand obtainHalo: self.
	evt  redButtonPressed  ifTrue:[
		self removeAllHandlesBut: rotationHandle.
	] ifFalse:[
		rotationHandle setProperty: #dragByCenterOfRotation toValue: true.
		self startDrag: evt with: rotationHandle
	].
	evt hand showTemporaryCursor: Cursor blank! !