--- a/ZipArchive.st	Tue May 06 16:00:06 2003 +0200
+++ b/ZipArchive.st	Tue May 06 17:11:14 2003 +0200
@@ -1488,7 +1488,7 @@
             and:[file next == 8r005
             and:[file next == 8r006]]]) ifTrue:[
                 foundPK := true.
-                pos0 := file position - 4.
+                pos0 := file position0Based - 4.
             ]
         ].
         foundPK ifTrue:[
@@ -1502,7 +1502,7 @@
 
     count_in := file nextUnsignedShortMSB:false.       "/ Get TOTAL_ENTRIES_CENTRAL_DIR
     dir_size := file nextLongMSB:false.                 "/ Get SIZE_CENTRAL_DIRECTORY
-    file position:(pos0 - dir_size ).
+    file position0Based:(pos0 - dir_size ).
 
     file signalAtEnd:true.
 
@@ -1738,7 +1738,7 @@
 !ZipArchive class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.41 2003-03-03 20:05:30 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.42 2003-05-06 15:11:14 cg Exp $'
 ! !
 
 ZipArchive initialize!