Code Review: Formatting and ward clause. Method should be made more modular.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2022-04-25 06:26:54 -05:00
parent bbfae14949
commit bd279b1fd3

View File

@ -3,20 +3,19 @@ exportProfileImageOn: fileReference
| file tempFile tempFileHash fileHash | | file tempFile tempFileHash fileHash |
file := fileReference asFileReference. file := fileReference asFileReference.
file exists file exists ifFalse: [
ifFalse: [ file ensureCreateFile. file ensureCreateFile.
file binaryWriteStreamDo: [ :stream | file binaryWriteStreamDo: [ :stream |
stream nextPutAll: profileImageUrl asUrl retrieveContents ]. stream nextPutAll: profileImageUrl asUrl retrieveContents ].
super class inform: 'Exported as: ', String cr, file fullName. super class inform: 'Exported as: ', String cr, file fullName.
^ file] ^ file
].
ifTrue: [
tempFile := FileLocator temp / fileReference basename. tempFile := FileLocator temp / fileReference basename.
tempFile ensureCreateFile. tempFile ensureCreateFile.
tempFile binaryWriteStreamDo: [ :stream | tempFile binaryWriteStreamDo: [ :stream |
stream nextPutAll: profileImageUrl asUrl retrieveContents. stream nextPutAll: profileImageUrl asUrl retrieveContents.
super class super class inform: 'Exported as: ', String cr, tempFile fullName.
inform: 'Exported as: ', String cr, tempFile fullName. ]. ].
OSSUnixSubprocess new OSSUnixSubprocess new
command: 'openssl'; command: 'openssl';
@ -44,5 +43,5 @@ exportProfileImageOn: fileReference
((file creationTime asLocalStringYMDHM) splitOn: ' ')), '.jpg'). ((file creationTime asLocalStringYMDHM) splitOn: ' ')), '.jpg').
file ensureDelete. file ensureDelete.
^ { 'Profile image changed' -> ^ { 'Profile image changed' ->
(tempFile moveTo: file)} asDictionary ]]. (tempFile moveTo: file)} asDictionary ].
^ { 'Same Profile Image' -> file } asDictionary ^ { 'Same Profile Image' -> file } asDictionary