Renabling themes downloading.
This commit is contained in:
parent
f29ea2d014
commit
ef3218a343
@ -141,9 +141,12 @@ BreaTheme >> folder: anObject [
|
|||||||
|
|
||||||
{ #category : #installation }
|
{ #category : #installation }
|
||||||
BreaTheme >> installInto: aFolder [
|
BreaTheme >> installInto: aFolder [
|
||||||
| zippedFile |
|
| zippedFile |
|
||||||
self url ifNil: [ ^ self ].
|
self url ifNil: [ ^ self ].
|
||||||
zippedFile := self downloadInto: FileLocator temp.
|
ZnClient new
|
||||||
|
url: self url;
|
||||||
|
downloadTo: FileLocator temp.
|
||||||
|
zippedFile := FileLocator temp / 'download'.
|
||||||
(ZipArchive new readFrom: zippedFile) extractAllTo: aFolder.
|
(ZipArchive new readFrom: zippedFile) extractAllTo: aFolder.
|
||||||
^ aFolder
|
^ aFolder
|
||||||
]
|
]
|
||||||
|
Loading…
Reference in New Issue
Block a user