The Trunk: EToys-kfr.126.mcz

Previous Topic Next Topic
 
classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

The Trunk: EToys-kfr.126.mcz

commits-2
Karl Ramberg uploaded a new version of EToys to project The Trunk:
http://source.squeak.org/trunk/EToys-kfr.126.mcz

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

Name: EToys-kfr.126
Author: kfr
Time: 5 May 2015, 6:24:47.803 pm
UUID: a325f205-34bf-e24b-8fb4-173d05fa300b
Ancestors: EToys-kfr.125

Fix spelling

=============== Diff against EToys-kfr.125 ===============

Item was changed:
  ----- Method: Player>>tearOffButtonToFireScriptForSelector: (in category 'costume') -----
  tearOffButtonToFireScriptForSelector: aSelector
  "Tear off a button to fire the script for the given selector"
 
  | aButton props |
+ Preferences useButtonPropertiesToFire ifFalse:
- Preferences useButtonProprtiesToFire ifFalse:
  [aButton := ScriptActivationButton new.
  aButton initializeForPlayer: self uniclassScript:  (self class scripts at: aSelector).
  ^ aButton openInHand].
 
  (aButton := RectangleMorph new) useRoundedCorners; color: Color yellow.
  props := aButton ensuredButtonProperties.
  props
  target: self;
  actionSelector: #runScript:;
  arguments: {aSelector};
  delayBetweenFirings: 80;
  actWhen: #mouseUp;
  mouseDownHaloWidth: 8;
  wantsRolloverIndicator: true;
  mouseOverHaloWidth: 5;
  establishEtoyLabelWording.
  aButton width: aButton submorphs first width + 20; height: 20.
  self currentHand attachMorph: aButton.
  !