'From etoys3.0 of 28 February 2008 [latest update: #2034] on 19 June 2008 at 11:36:58 pm'!
"Change Set:		numberAtCursorFix-sw
Date:			19 June 2008
Author:			Scott Wallace

Among the points raised in TRAC ticket 7315 is the observation that the 'number at cursor' item in the collections category of a Viewer delivers the wrong value, and does not work correctly as a setter, if the corresponding item is currently a text-like morph which has been rotated or scaled.  This update fixes that problem."!


!Player methodsFor: 'slot getters/setters' stamp: 'sw 6/19/2008 23:29'!
getNumberAtCursor
	"Answer the number borne by the object at my costume's current cursor position"

	| renderedMorph aCostume |
	aCostume _ self costume.
	((renderedMorph _ aCostume renderedMorph) respondsTo: #valueAtCursor:) ifTrue: [^ renderedMorph valueAtCursor renderedMorph getNumericValue]! !

!Player methodsFor: 'slot getters/setters' stamp: 'sw 6/19/2008 23:31'!
setNumberAtCursor: aNumber
	"Place the given number into the morph residing at my costume's current cursor position"

	| renderedMorph aCostume |
	aCostume _ self costume.
	((renderedMorph _ aCostume renderedMorph) respondsTo: #valueAtCursor:) ifTrue: [^ renderedMorph valueAtCursor renderedMorph setNumericValue: aNumber]! !