The Trunk: Morphic-kfr.1087.mcz

Karl Ramberg uploaded a new version of Morphic to project The Trunk:
http://source.squeak.org/trunk/Morphic-kfr.1087.mcz

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

Name: Morphic-kfr.1087
Author: kfr
Time: 18 February 2016, 5:41:51.124716 pm
UUID: 472f96c2-235b-4e48-83c7-8af0577e5618
Ancestors: Morphic-mt.1086

Fix for initiliazing the forms

=============== Diff against Morphic-mt.1086 ===============

Item was changed:
  ----- Method: SimpleHierarchicalListMorph class>>expandedForm (in category 'instance creation') -----
  expandedForm
+ expandedForm
+ ifNotNil: [expandedForm depth ~= Display depth
+ ifTrue: [expandedForm := nil]].
+ ^ expandedForm
+ ifNil: [expandedForm := ((Form
+ extent: 10 @ 9
+ depth: 8
+ fromArray: #(4294967295 4294967295 4294901760 4294967295 4294967295 4294901760 4278255873 16843009 16842752 4294902089 1229539657 33488896 4294967041 1229539585 4294901760 4294967295 21561855 4294901760 4294967295 4278321151 4294901760 4294967295 4294967295 4294901760 4294967295 4294967295 4294901760 )
+ offset: 0 @ 0)
+ asFormOfDepth: Display depth) replaceColor: Color white withColor: Color transparent;
+ yourself]!
-
- expandedForm ifNotNil: [ expandedForm depth ~= Display depth ifTrue: [ expandedForm := nil ]].
-
- ^expandedForm ifNil: [expandedForm :=
- (Form
- extent: 10@9
- depth: 8
- fromArray: #( 4294967295 4294967295 4294901760 4294967295 4294967295 4294901760 4278255873 16843009 16842752 4294902089 1229539657 33488896 4294967041 1229539585 4294901760 4294967295 21561855 4294901760 4294967295 4278321151 4294901760 4294967295 4294967295 4294901760 4294967295 4294967295 4294901760)
- offset: 0@0)
- asFormOfDepth: Display depth;
- replaceColor: Color white withColor: Color transparent;
- yourself
- ].
- !

Item was changed:
  ----- Method: SimpleHierarchicalListMorph class>>notExpandedForm (in category 'instance creation') -----
  notExpandedForm
+ notExpandedForm
+ ifNotNil: [notExpandedForm depth ~= Display depth
+ ifTrue: [notExpandedForm := nil]].
+ ^ notExpandedForm
+ ifNil: [notExpandedForm := ((Form
+ extent: 10 @ 9
+ depth: 8
+ fromArray: #(4294967041 4294967295 4294901760 4294967041 33554431 4294901760 4294967041 1224867839 4294901760 4294967041 1229521407 4294901760 4294967041 1229539585 4294901760 4294967041 1229521407 4294901760 4294967041 1224867839 4294901760 4294967041 33554431 4294901760 4294967041 4294967295 4294901760 )
+ offset: 0 @ 0)
+ asFormOfDepth: Display depth) notExpandedForm replaceColor: Color white withColor: Color transparent;
+ yourself]!
-
- notExpandedForm ifNotNil: [ notExpandedForm depth ~= Display depth ifTrue: [ notExpandedForm := nil ]].
-
- ^notExpandedForm ifNil: [notExpandedForm :=
- (Form
- extent: 10@9
- depth: 8
- fromArray: #( 4294967041 4294967295 4294901760 4294967041 33554431 4294901760 4294967041 1224867839 4294901760 4294967041 1229521407 4294901760 4294967041 1229539585 4294901760 4294967041 1229521407 4294901760 4294967041 1224867839 4294901760 4294967041 33554431 4294901760 4294967041 4294967295 4294901760)
- offset: 0@0)
- asFormOfDepth: Display depth;
- replaceColor: Color white withColor: Color transparent;
- yourself
- ].
- !