Bert Freudenberg uploaded a new version of Morphic to project Etoys:
http://source.squeak.org/etoys/Morphic-bf.94.mcz==================== Summary ====================
Name: Morphic-bf.94
Author: bf
Time: 24 June 2012, 8:23:29 pm
UUID: 143f52a9-1a4f-4200-872d-78cdabe1729d
Ancestors: Morphic-bf.93
Change Set: brushSizePref-sw
Date: 13 January 2012
Author: Scott Wallace
Pass current event to ThreePhaseButtonMorph's action, if wanted.
=============== Diff against Morphic-bf.93 ===============
Item was changed:
----- Method: ThreePhaseButtonMorph>>doButtonAction (in category 'button') -----
doButtonAction
"Perform the action of this button. Subclasses may override this method. The default behavior is to send the button's actionSelector to its target object with its arguments."
+ | args |
(target notNil and: [actionSelector notNil])
ifTrue:
+ [args := actionSelector numArgs > arguments size
+ ifTrue:
+ [arguments copyWith: ActiveEvent]
+ ifFalse:
+ [arguments].
+ Cursor normal
+ showWhile: [target perform: actionSelector withArguments: args].
- [Cursor normal
- showWhile: [target perform: actionSelector withArguments: arguments].
target isMorph ifTrue: [target changed]]!
_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev