diff --git a/.smalltalk.ston b/.smalltalk.ston
index 4905f3d..c77b696 100644
--- a/.smalltalk.ston
+++ b/.smalltalk.ston
@@ -3,6 +3,7 @@ SmalltalkCISpec {
     SCIMetacelloLoadSpec {
       #baseline : 'ToploSerialization',
       #directory : 'src',
+      #onConflict : #useLoaded,
       #platforms : [ #pharo ]
     }
   ]
diff --git a/src/Toplo-Serialization-Stash/TToCheckable.extension.st b/src/Toplo-Serialization-Stash/TToCheckable.extension.st
index 541cbb1..8bed728 100644
--- a/src/Toplo-Serialization-Stash/TToCheckable.extension.st
+++ b/src/Toplo-Serialization-Stash/TToCheckable.extension.st
@@ -5,12 +5,8 @@ TToCheckable >> stashAccessorsForTToCheckable [
 
 	<stashAccessors>
 	| settersAndGetters |
-	self class == ToTab ifTrue: [ ^ {  } ].
 	self isCheckable ifFalse: [ ^ {  } ].
-	
 	settersAndGetters := OrderedCollection new.
-	
-	self class == ToToggleButton ifFalse: [ settersAndGetters add: #initializeCheckable onlySetOnStash ].
 	self checked ifTrue: [ settersAndGetters add: #checked ].
 	self group ifNotNil: [ settersAndGetters add: #group ].
 	^ settersAndGetters
diff --git a/src/Toplo-Serialization-Stash/ToTab.extension.st b/src/Toplo-Serialization-Stash/ToTab.extension.st
deleted file mode 100644
index 11a9519..0000000
--- a/src/Toplo-Serialization-Stash/ToTab.extension.st
+++ /dev/null
@@ -1,32 +0,0 @@
-Extension { #name : #ToTab }
-
-{ #category : #'*Toplo-Serialization-Stash' }
-ToTab >> firstElement [
-
-	| first |
-	first := self children first.
-	first == filler ifTrue: [ ^ nil ].
-	^ first
-]
-
-{ #category : #'*Toplo-Serialization-Stash' }
-ToTab >> firstElement: anElement [
-
-	anElement ifNil: [ ^ self ].
-	self addChild: anElement at: 1
-]
-
-{ #category : #'*Toplo-Serialization-Stash' }
-ToTab >> stashElement [
-
-	<stashAccessors>
-	self firstElement ifNil: [ ^ {  } ].
-	^ { (#firstElement: -> #firstElement) }
-]
-
-{ #category : #'*Toplo-Serialization-Stash' }
-ToTab >> stashPaneBuilder [
-
-	<stashAccessors>
-	^ { #paneBuilder }
-]
diff --git a/src/Toplo-Serialization-Stash/ToTabPane.extension.st b/src/Toplo-Serialization-Stash/ToTabPane.extension.st
deleted file mode 100644
index e46b04d..0000000
--- a/src/Toplo-Serialization-Stash/ToTabPane.extension.st
+++ /dev/null
@@ -1,14 +0,0 @@
-Extension { #name : #ToTabPane }
-
-{ #category : #'*Toplo-Serialization-Stash' }
-ToTabPane >> stashAddAllTabs: aCollectionOfTabs [
-
-	aCollectionOfTabs do: [ :each | self addTab: each ].
-]
-
-{ #category : #'*Toplo-Serialization-Stash' }
-ToTabPane >> stashTabs [
-
-	<stashAccessors>
-	^ { #stashAddAllTabs: -> #tabs }
-]
diff --git a/src/Toplo-Serialization-Tests/ToSerializerTest.class.st b/src/Toplo-Serialization-Tests/ToSerializerTest.class.st
index 8d6a50c..4149613 100644
--- a/src/Toplo-Serialization-Tests/ToSerializerTest.class.st
+++ b/src/Toplo-Serialization-Tests/ToSerializerTest.class.st
@@ -201,31 +201,6 @@ ToSerializerTest >> testToButton5 [
 		self deny: element isCheckable ]
 ]
 
-{ #category : #tests }
-ToSerializerTest >> testToButton6 [
-
-	| origin |
-	origin := ToButton new
-		          beCheckable;
-		          yourself.
-
-	self test: origin on: [ :element | self assert: element isCheckable.
-		self deny: element isChecked ]
-]
-
-{ #category : #tests }
-ToSerializerTest >> testToButton7 [
-
-	| origin |
-	origin := ToButton new
-		          beCheckable;
-		check;
-		          yourself.
-
-	self test: origin on: [ :element | self assert: element isCheckable.
-		self assert: element isChecked ]
-]
-
 { #category : #tests }
 ToSerializerTest >> testToCheckbox1 [
 
@@ -353,119 +328,6 @@ ToSerializerTest >> testToLabel [
 		on: [ :element | self assert: element text asString equals: 'hello' ]
 ]
 
-{ #category : #tests }
-ToSerializerTest >> testToTabPane1 [
-
-	| origin |
-	origin := ToTabPane new.
-	origin resizablePanes: true.
-	1 to: 3 do: [ :index | | tab |
-		tab := ToTab new.
-		tab closable: true.
-		tab labelText: 'Button ' , index asString.
-		tab paneBuilder: [ :pane :theNoteBook |
-			pane background: Color random ].
-		origin addTab: tab ].
-
-	self test: origin on: [ :element |
-		self assert: element tabs size equals: 3 ]
-]
-
-{ #category : #tests }
-ToSerializerTest >> testToTabPane2 [
-
-	| origin |
-	origin := ToTabPane new.
-	origin resizablePanes: true.
-	1 to: 100 do: [ :index |
-		| tab |
-		tab := ToTab new.
-		tab closable: true.
-		tab labelText: 'Button ' , index asString.
-		tab paneBuilder: [ :pane :theNoteBook |
-			pane background: Color random ].
-		origin addTab: tab ].
-
-	self
-		test: origin
-		on: [ :element | self assert: element tabs size equals: 100 ]
-]
-
-{ #category : #tests }
-ToSerializerTest >> testToTabPane3 [
-
-	| origin |
-	origin := ToTabPane new.
-	origin resizablePanes: true.
-	1 to: 0 do: [ :index |
-		| tab |
-		tab := ToTab new.
-		tab closable: true.
-		tab labelText: 'Button ' , index asString.
-		tab paneBuilder: [ :pane :theNoteBook |
-			pane background: Color random ].
-		origin addTab: tab ].
-
-	self
-		test: origin
-		on: [ :element | self assert: element tabs size equals: 0 ]
-]
-
-{ #category : #tests }
-ToSerializerTest >> testToTabPane4 [
-
-	| origin |
-	origin := ToTabPane new.
-	origin resizablePanes: true.
-	1 to: 3 do: [ :index |
-		| tab |
-		tab := ToTab new.
-		tab closable: true.
-		tab labelText: 'Button ' , index asString.
-		tab paneBuilder: [ :pane :theNoteBook |
-			pane background: Color random ].
-		origin addTab: tab ].
-
-	self test: origin on: [ :element |
-		self assert: element tabs size equals: 3.
-		self
-			assert: element tabs first firstElement text asString
-			equals: 'Button 1'.
-		self
-			assert: element tabs second firstElement text asString
-			equals: 'Button 2'.
-		self
-			assert: element tabs third firstElement text asString
-			equals: 'Button 3' ]
-]
-
-{ #category : #tests }
-ToSerializerTest >> testToTabPane5 [
-
-	| origin |
-	origin := ToTabPane new.
-	origin resizablePanes: true.
-	1 to: 3 do: [ :index |
-		| tab |
-		tab := ToTab new.
-		tab closable: true.
-		tab labelText: 'Button ' , index asString.
-		tab paneBuilder: [ :pane :theNoteBook | #test ].
-		origin addTab: tab ].
-
-	self test: origin on: [ :element |
-		self assert: element tabs size equals: 3.
-		self
-			assert: (element tabs first paneBuilder value: nil value: nil)
-			equals: #test.
-		self
-			assert: (element tabs second paneBuilder value: nil value: nil)
-			equals: #test.
-		self
-			assert: (element tabs third paneBuilder value: nil value: nil)
-			equals: #test ]
-]
-
 { #category : #tests }
 ToSerializerTest >> testTokens [