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

[commits at source.squeak.org]

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

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

Name: MorphicExtras-kfr.57
Author: kfr
Time: 24 November 2011, 6:30:58 pm
UUID: 19ce2192-5843-d44e-9f2a-1ea784af44b3
Ancestors: MorphicExtras-kfr.56

Fix for triggering opening and closing scripts in BookMorphs
http://tracker.squeakland.org/browse/SQ-999
¨

=============== Diff against MorphicExtras-kfr.56 ===============

Item was changed:
  ----- Method: BooklikeMorph>>currentPlayerDo: (in category 'e-toy support') -----
  currentPlayerDo: aBlock
  	| aPlayer aPage |
+ 	(aPage := self currentPage) ifNil: [^ self].
+ 	aPage allMorphsDo:[ :m|
+ 	(aPlayer := m player) ifNotNil:
+ 		[aBlock value: aPlayer]]!
- 	(aPage _ self currentPage) ifNil: [^ self].
- 	(aPlayer _ aPage player) ifNotNil:
- 		[aBlock value: aPlayer]!