--- a/MCMczWriter.st	Tue Aug 09 03:35:19 2016 +0000
+++ b/MCMczWriter.st	Thu Nov 03 13:22:28 2016 +0100
@@ -1,5 +1,7 @@
 "{ Package: 'stx:goodies/monticello' }"
 
+"{ NameSpace: Smalltalk }"
+
 MCWriter subclass:#MCMczWriter
 	instanceVariableNames:'zip infoWriter'
 	classVariableNames:''
@@ -161,7 +163,7 @@
 
 flush
         "zip writeTo: stream."
-        zip closeFile.
+        zip close.
         stream close
 
     "Modified: / 11-09-2010 / 19:36:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
@@ -170,14 +172,14 @@
 !MCMczWriter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMczWriter.st,v 1.8 2013-05-29 11:46:15 vrany Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/goodies/monticello/MCMczWriter.st,v 1.8 2013-05-29 11:46:15 vrany Exp $'
+    ^ '$Header$'
 !
 
 version_SVN
-    ^ '$Id: MCMczWriter.st,v 1.8 2013-05-29 11:46:15 vrany Exp $'
+    ^ '$Id$'
 ! !