--- a/VSEChunkFileSourceWriter.st	Thu Feb 05 15:09:22 2015 +0100
+++ b/VSEChunkFileSourceWriter.st	Thu Feb 05 15:10:01 2015 +0100
@@ -260,6 +260,17 @@
                 withTimeStamp:first withInitialize:true 
                 withDefinition:true 
                 methodFilter:nil encoder:nil.
+
+            (eachClass theMetaclass implements:#initialize) ifTrue:[
+                aStream nextPutChunkSeparator.
+                aStream nextPutAll:(self rewrittenClassNameOf:eachClass theNonMetaclass).
+                aStream nextPutAll:' class methodsFor: ''initialization'''.
+                aStream nextPutChunkSeparator; cr; cr.
+
+                aStream nextPutLine:(self rewrittenClassNameOf:eachClass theNonMetaclass),'Initialization'.
+                aStream nextPutLine:'    self initialize'.
+                aStream nextPutChunkSeparator; space; nextPutChunkSeparator; cr; cr.
+            ].
             first := false.
         ].
 
@@ -304,8 +315,9 @@
     rememberedInitializers notEmptyOrNil ifTrue:[
         aStream cr.
         rememberedInitializers do:[:eachClass |
+            aStream nextPutAll:(self rewrittenClassNameOf:eachClass); space.
             aStream nextPutAll:(self rewrittenClassNameOf:eachClass).
-            aStream nextPutAll:' initialize'.
+            aStream nextPutAll:'Initialization'.
             aStream nextPutChunkSeparator.
             aStream cr.
         ].
@@ -327,10 +339,10 @@
 !VSEChunkFileSourceWriter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/VSEChunkFileSourceWriter.st,v 1.11 2015-02-05 13:16:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/VSEChunkFileSourceWriter.st,v 1.12 2015-02-05 14:10:01 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/VSEChunkFileSourceWriter.st,v 1.11 2015-02-05 13:16:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/VSEChunkFileSourceWriter.st,v 1.12 2015-02-05 14:10:01 cg Exp $'
 ! !