equal
deleted
inserted
replaced
2924 ! |
2924 ! |
2925 |
2925 |
2926 readingFrom:aPositionableStream |
2926 readingFrom:aPositionableStream |
2927 "open an existing Zip archive - read data from aPositionableStream" |
2927 "open an existing Zip archive - read data from aPositionableStream" |
2928 |
2928 |
2929 ^ self new readingFrom:aPositionableStream. |
2929 ^ self new readFrom:aPositionableStream. |
2930 ! |
2930 ! |
2931 |
2931 |
2932 writingTo:aPositionableStream |
2932 writingTo:aPositionableStream |
2933 "open an new Zip archive - write data to aPositionableStream" |
2933 "open an new Zip archive - write data to aPositionableStream" |
2934 |
2934 |
3213 ] ifFalse:[ |
3213 ] ifFalse:[ |
3214 self openFile. |
3214 self openFile. |
3215 ]. |
3215 ]. |
3216 ! |
3216 ! |
3217 |
3217 |
3218 readingFrom:aPositionableStream |
3218 readFrom:aPositionableStream |
3219 "initialize the archive to read from aPositionableStream" |
3219 "initialize the archive to read from aPositionableStream" |
3220 |
3220 |
3221 file notNil ifTrue: [ |
3221 file notNil ifTrue: [ |
3222 self closeFile. |
3222 self closeFile. |
3223 ]. |
3223 ]. |
3229 archiveName := aPositionableStream pathName. |
3229 archiveName := aPositionableStream pathName. |
3230 ] ifFalse:[ |
3230 ] ifFalse:[ |
3231 archiveName := 'internal stream'. |
3231 archiveName := 'internal stream'. |
3232 ]. |
3232 ]. |
3233 self readDirectory. |
3233 self readDirectory. |
|
3234 ! |
|
3235 |
|
3236 readingFrom:aPositionableStream |
|
3237 "initialize the archive to read from aPositionableStream" |
|
3238 |
|
3239 "/ renamed to readFrom: for squeak compat. |
|
3240 ^ self readFrom:aPositionableStream |
3234 ! |
3241 ! |
3235 |
3242 |
3236 writingTo:aPositionableStream |
3243 writingTo:aPositionableStream |
3237 "initialize the archive to read from aPositionableStream" |
3244 "initialize the archive to read from aPositionableStream" |
3238 |
3245 |
4928 ! ! |
4935 ! ! |
4929 |
4936 |
4930 !ZipArchive class methodsFor:'documentation'! |
4937 !ZipArchive class methodsFor:'documentation'! |
4931 |
4938 |
4932 version |
4939 version |
4933 ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.78 2009-10-26 14:36:00 cg Exp $' |
4940 ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.79 2009-10-26 14:55:42 cg Exp $' |
4934 ! |
4941 ! |
4935 |
4942 |
4936 version_CVS |
4943 version_CVS |
4937 ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.78 2009-10-26 14:36:00 cg Exp $' |
4944 ^ '$Header: /cvs/stx/stx/libbasic2/ZipArchive.st,v 1.79 2009-10-26 14:55:42 cg Exp $' |
4938 ! ! |
4945 ! ! |
4939 |
4946 |
4940 ZipArchive initialize! |
4947 ZipArchive initialize! |