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 at 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 at 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 at 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 at 0)
- 					asFormOfDepth: Display depth;
- 					replaceColor: Color white withColor: Color transparent;
- 					yourself
- 	].
- !