00dani/lebd
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

Use Libravatar rather than tracking avatars internally

Browse source
This commit is contained in:
Danielle McLean 2017-10-03 11:48:44 +11:00
parent 2fa69f9883
commit 64c4aab14b
Signed by: 00dani
GPG key ID: 3844A6973C6058F1
6 changed files with 12 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/Widget/Hcard.hs
View file

@ -4,9 +4,9 @@
module Widget.Hcard (hcard) where
import Import
img :: Text -> Route App
img file = StaticR . flip StaticRoute [] $ ["img", file]
import qualified Network.Libravatar as L
hcard :: User -> Widget
hcard user = $(widgetFile "hcard")
hcard user = do
maybeAvatar <- liftIO $ L.avatarUrl (L.Email $ userEmail user) def { L.optSecure = True, L.optSize = L.Size 512 }
$(widgetFile "hcard")