Tim Felgentreff uploaded a new version of Sugar to project Etoys Inbox: http://source.squeak.org/etoysinbox/Sugar-tfel.27.mcz
==================== Summary ====================
Name: Sugar-tfel.27 Author: tfel Time: 28 July 2016, 12:05:15.085881 pm UUID: 75965e76-103a-2441-a650-c45a488a1b02 Ancestors: Sugar-kfr.26
container is a rectangle
=============== Diff against Sugar-kfr.26 ===============
Item was changed: ----- Method: SolidSugarSuppliesTab>>positionObject:atEdgeOf: (in category 'mechanics') ----- positionObject: anObject atEdgeOf: container "Position an object -- either the receiver or its referent -- on the edge of the container."
| extra | extra _ (sugarNavTab notNil and: [referent isInWorld]) ifTrue: [sugarNavTab height] ifFalse: [0].
edgeToAdhereTo == #top ifTrue: + [^ anObject top: container top + extra]. - [^ anObject top: container innerBounds top + extra].
"bottom..." anObject == self ifFalse: "the parts bin" + [anObject bottom: (container bottom - extra)] - [anObject bottom: (container innerBounds bottom - extra)] ifTrue: "the tab" + [anObject bottom: (container bottom - (self referentThickness + extra))] ! - [anObject bottom: (container innerBounds bottom - (self referentThickness + extra))] !
etoys-dev@lists.squeakfoundation.org