[squeak-dev] The Trunk: Morphic-Igor.Stasenko.167.mcz

Andreas Raab uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-Igor.Stasenko.167.mcz

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

Name: Morphic-Igor.Stasenko.167
Author: Igor.Stasenko
Time: 4 September 2009, 4:12:59 am
UUID: 1443e95e-b340-484d-908a-f7880e9d839d
Ancestors: Morphic-bf.166

Yet another fix for top corner grips of
SystemWindow morph.
I hope now it will serve us for a couple more years.

=============== Diff against Morphic-bf.166 ===============

Item was added:
+ ----- Method: TopLeftGripMorph>>layoutProportionallyIn: (in category 'layout') -----
+ layoutProportionallyIn: newBounds
+ | b |
+ b := owner bounds.
+ self bounds: (b topLeft extent: self extent)
+ !

Item was changed:
  ----- Method: TopRightGripMorph>>gripLayoutFrame (in category 'accessing') -----
  gripLayoutFrame
  ^ LayoutFrame
+ fractions: (1 @ 0 corner: 1 @ nil)
+ offsets: (0 - self defaultWidth @ 0 corner: 0 @ nil)!
- fractions: (1 @ 0 corner: 1 @ 0)
- offsets: (0 - self defaultWidth @ -27 corner: 0 @ 0)!

Item was added:
+ ----- Method: TopRightGripMorph>>layoutProportionallyIn: (in category 'layout') -----
+ layoutProportionallyIn: newBounds
+ | b |
+ b := owner bounds.
+
+ self bounds: (b right - self width @ b top extent: self extent)
+ !

Item was changed:
  ----- Method: TopLeftGripMorph>>gripLayoutFrame (in category 'accessing') -----
  gripLayoutFrame
  ^ LayoutFrame
  fractions: (0 @ 0 corner: 0 @ 0)
+ offsets: (0 @ 0 corner: self defaultWidth @ 0)!
- offsets: (0 @ -27 corner: self defaultWidth @ 0)!