[etoys-dev] Etoys Inbox: EToysIMPORT-tfel.9.mcz

[commits at source.squeak.org]

Tim Felgentreff uploaded a new version of EToysIMPORT to project Etoys Inbox:
http://source.squeak.org/etoysinbox/EToysIMPORT-tfel.9.mcz

==================== Summary ====================

Name: EToysIMPORT-tfel.9
Author: tfel
Time: 28 July 2016, 3:39:53.296874 pm
UUID: 6b3f54f8-8db1-4743-8327-0ca7f508cb50
Ancestors: EToysIMPORT-tfel.8

add this override to make biggerCursors work (might be useful to add to Squeak trunk)

=============== Diff against EToysIMPORT-tfel.8 ===============

Item was added:
+ ----- Method: Cursor class>>currentCursor: (in category '*EToysIMPORT-override-current cursor') -----
+ currentCursor: aCursor 
+ 	"Make the instance of cursor, aCursor, be the current cursor. Display it. 
+ 	Create an error if the argument is not a Cursor."
+ 
+ 	(aCursor isKindOf: self)
+ 		ifTrue: [CurrentCursor _ aCursor.
+ 				Preferences biggerCursors
+ 					ifTrue: [[^aCursor asBigCursor beCursor] 
+ 						on: Error do: ["fall through"]].
+ 				aCursor beCursor]
+ 		ifFalse: [self error: 'The new cursor must be an instance of class Cursor']!