[etoys-dev] Etoys: MorphicExtras-kfr.5.mcz

[commits at source.squeak.org]

Karl Ramberg uploaded a new version of MorphicExtras to project Etoys:
http://source.squeak.org/etoys/MorphicExtras-kfr.5.mcz

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

Name: MorphicExtras-kfr.5
Author: kfr
Time: 15 June 2010, 12:52:10 pm
UUID: fedeb565-8e0c-4240-aa44-75f5a33d0721
Ancestors: MorphicExtras-Richo.4

Magnifyer, Add a test for flexing (changing heading). Increase stepTime to 100 mSec

=============== Diff against MorphicExtras-Richo.4 ===============

Item was changed:
  ----- Method: MagnifierMorph>>sourcePoint (in category 'magnifying') -----
  sourcePoint
  	"If we are being dragged use our center, otherwise use pointer position"
  	^(trackPointer not or: [owner notNil and: [owner isHandMorph]])
+ 		ifTrue: [self isFlexed ifTrue:[owner center] ifFalse:[self center]]
- 		ifTrue: [self center]
  		ifFalse: [self currentHand position]!

Item was changed:
  ----- Method: MagnifierMorph>>stepTime (in category 'testing') -----
  stepTime
+ 	^ 100
+ !
- 	^ 0!