[squeak-dev] The Trunk: MorphicTests-mt.47.mcz

commits at source.squeak.org commits at source.squeak.org
Thu May 31 07:26:55 UTC 2018


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.!



More information about the Squeak-dev mailing list