2022-03-28 21:45:54 +00:00
|
|
|
accessing
|
|
|
|
|
exportProfileImageOn: fileReference
|
|
|
|
|
|
|
|
|
|
| file |
|
|
|
|
|
file := fileReference asFileReference.
|
|
|
|
|
file ensureDelete.
|
|
|
|
|
file exists ifFalse: [ file ensureCreateFile ].
|
|
|
|
|
file binaryWriteStreamDo: [ :stream |
|
|
|
|
|
stream nextPutAll: profileImageUrl retrieveContents ].
|
2022-03-29 22:10:43 +00:00
|
|
|
profileImageFile := file.
|
2022-03-28 21:45:54 +00:00
|
|
|
super class inform: 'Exported as: ', String cr, file fullName.
|
|
|
|
|
^ file
|
