Replacing temporal downloded folders for new themes.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2024-10-20 19:59:36 -05:00
parent 7b86b2cfeb
commit 2875964efc

View File

@ -143,11 +143,13 @@ BreaTheme >> folder: anObject [
BreaTheme >> installInto: aFolder [
| zippedFile |
self url ifNil: [ ^ self ].
zippedFile := FileLocator temp / 'download'.
zippedFile ensureDelete.
ZnClient new
url: self url;
downloadTo: FileLocator temp.
zippedFile := FileLocator temp / 'download'.
(ZipArchive new readFrom: zippedFile) extractAllTo: aFolder.
self folder: aFolder.
^ aFolder
]