Mercurial Mercurial > hg > stx-libbasic2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#REFACTORING by stefan
authorStefan Vogel <sv@exept.de>
Fri, 21 Oct 2016 12:17:30 +0200
changeset 4178 7999633b99d2
parent 4177 65b9a5e50e5e
child 4179 51596c002c86
#REFACTORING by stefan class: ZipArchive changed: #basicAddFile:withContents:compressMethod:asDirectory:
ZipArchive.st file | annotate | diff | comparison | revisions 
--- a/ZipArchive.st	Fri Oct 21 10:31:56 2016 +0200
+++ b/ZipArchive.st	Fri Oct 21 12:17:30 2016 +0200
@@ -4391,7 +4391,7 @@
 
     data notEmptyOrNil ifTrue:[
         "/ crc32 is always required (not as written in docu to be zero in case of uncompressed mode)
-        zipEntry crc32:(ZipStream crc32BytesIn:data).
+        zipEntry crc32:(ZipStream crc32BytesIn:data from:1 to:data size crc:0).
     ].
     (isDirectory not and:[ theCompressMethod == COMPRESSION_DEFLATED ]) ifTrue:[
         |tmpCompressedDataSize|
hg/stx-libbasic2