diff --git a/src/Toplo-Serialization-Tests/ToSerializerTest.class.st b/src/Toplo-Serialization-Tests/ToSerializerTest.class.st index 20a43cc..4c72ac2 100644 --- a/src/Toplo-Serialization-Tests/ToSerializerTest.class.st +++ b/src/Toplo-Serialization-Tests/ToSerializerTest.class.st @@ -117,6 +117,32 @@ ToSerializerTest >> testIsLeaf4 [ self assert: element childrenCount equals: 1. ] +{ #category : #tests } +ToSerializerTest >> testLocalTheme1 [ + + | origin | + origin := BlElement new localTheme: ToBeeTheme new; yourself. + + self test: origin on: [ :element | + self assert: element localTheme class equals: ToBeeTheme ] +] + +{ #category : #tests } +ToSerializerTest >> testLocalTheme2 [ + + | parent origin | + origin := BlElement new + localTheme: ToBeeDarkTheme new; + yourself. + parent := BlElement new + localTheme: ToBeeTheme new; + yourself. + parent addChild: origin. + + self test: origin on: [ :element | + self assert: element localTheme class equals: ToBeeDarkTheme ] +] + { #category : #tests } ToSerializerTest >> testStamps [