Displaying a generic profile image when customized image don't work.

This commit is contained in:
Offray Vladimir Luna Cárdenas 2021-08-13 11:53:03 -05:00
parent 63f409fad8
commit 616367ee10
1 changed files with 10 additions and 2 deletions

View File

@ -3,7 +3,15 @@ profileImage
| response |
response := ZnClient new url: (self profileImageUrl); get; response.
response contentType = ZnMimeType imageJpeg
ifTrue: [ ^ (JPEGReadWriter gtFromBuffer: response contents) asElement ].
ifTrue: [ | imageTemp |
imageTemp := [JPEGReadWriter gtFromBuffer: response contents].
imageTemp on: Error do: [ ^ GtABContact new avatar ].
^ imageTemp value asElement
].
response contentType = ZnMimeType imagePng
ifTrue: [ ^ (PNGReadWriter gtFromBuffer: response contents) asElement ].
ifTrue: [ | imageTemp |
imageTemp := [PNGReadWriter gtFromBuffer: response contents].
imageTemp on: Error do: [ ^ GtABContact new avatar ].
^ imageTemp value asElement
].
^ BlElement new background: Color gray