Bert Freudenberg uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-bf.751.mcz
==================== Summary ====================
Name: Morphic-bf.751 Author: bf Time: 15 November 2014, 6:05:35.432 pm UUID: 5fb78a95-2971-460e-88c7-99b58c3152ca Ancestors: Morphic-topa.750, Morphic-dhn.723
Merge Morphic-dhn.723: Reduce cropping of SystemWindow submorphs by fullScreen
=============== Diff against Morphic-topa.750 ===============
Item was changed: ----- Method: SystemWindow>>fullScreen (in category 'menu') ----- fullScreen + "Zoom Window to full owner size, allowing for scroll bars and desk margins" - "Zoom Window to Full World size with possible DeskMargins" - "SystemWindow fullScreen" | left right possibleBounds | left := right := 0. self paneMorphs do: [:pane | ((pane isKindOf: ScrollPane) and: [pane retractableScrollBar]) ifTrue: [pane scrollBarOnLeft ifTrue: [left := left max: pane scrollBarThickness] ifFalse: [right := right max: pane scrollBarThickness]]]. + possibleBounds := (RealEstateAgent maximumUsableAreaInWorld: self owner) - possibleBounds := (RealEstateAgent maximumUsableAreaInWorld: self world) insetBy: (left @ 0 corner: right @ 0). Preferences fullScreenLeavesDeskMargins ifTrue: [possibleBounds := possibleBounds insetBy: 22]. self bounds: possibleBounds!
packages@lists.squeakfoundation.org