David T. Lewis uploaded a new version of MorphicExtras to project The Trunk: http://source.squeak.org/trunk/MorphicExtras-dtl.222.mcz
==================== Summary ====================
Name: MorphicExtras-dtl.222 Author: dtl Time: 19 February 2018, 9:58:54.987645 pm UUID: 7d4e14dd-aad7-4cf8-8f68-41e1381c4727 Ancestors: MorphicExtras-tpr.221
FlapTab>>positionObject: anObject atEdgeOf: container expects container to be a Morph, not a Rectangle. Make it so when sending from FlapTab>>positionObject.
Fixes flap opening in a Worldlet, such as the flap tabs in "EventRecordingSpace open".
=============== Diff against MorphicExtras-tpr.221 ===============
Item was changed: ----- Method: FlapTab>>positionObject: (in category 'positioning') ----- positionObject: anObject "anObject could be myself or my referent"
+ | pum clearArea | - "Could consider container := referent pasteUpMorph, to allow flaps on things other than the world, but for the moment, let's skip it!!" - - "19 sept 2000 - going for all paste ups" - - | pum | pum := self pasteUpMorph ifNil: [^ self].
+ clearArea := Morph newBounds: pum clearArea. ^self positionObject: anObject + atEdgeOf: clearArea! - atEdgeOf: pum clearArea!
packages@lists.squeakfoundation.org