The Trunk: MorphicTests-mt.47.mcz

Marcel Taeumel uploaded a new version of MorphicTests to project The Trunk:
http://source.squeak.org/trunk/MorphicTests-mt.47.mcz

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

Name: MorphicTests-mt.47
Author: mt
Time: 31 May 2018, 9:26:39.508323 am
UUID: 8c7b340d-5fcf-6346-8ed0-609d2e1c21f4
Ancestors: MorphicTests-mt.46

Adds a test for the interplay between layouts and border styles.

=============== Diff against MorphicTests-mt.46 ===============

Item was added:
+ ----- Method: BorderedMorphTests>>test04InnerBounds (in category 'tests') -----
+ test04InnerBounds
+ "Check whether a changed border width triggers a layout re-computation."
+
+ | sut |
+ sut := Morph new.
+ sut changeTableLayout.
+ sut addMorph: (Morph new
+ hResizing: #spaceFill;
+ vResizing: #spaceFill;
+ yourself).
+
+ self
+ assert: 0 equals: sut borderWidth;
+ assert: sut fullBounds equals: sut bounds;
+ assert: sut bounds equals: sut innerBounds;
+ assert: sut bounds equals: sut firstSubmorph bounds.
+
+ sut borderStyle: (BorderStyle raised width: 10).
+
+ self
+ assert: 10 equals: sut borderWidth;
+ assert: sut fullBounds equals: sut bounds;
+ assert: (sut bounds insetBy: 10) equals: sut innerBounds;
+ assert: sut innerBounds equals: sut firstSubmorph bounds.!