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

Create an h-card widget and display my h-card on the homepage - needs more info but it's a good start

Browse source
This commit is contained in:
Danielle McLean 2017-10-03 00:52:14 +11:00
parent 5eccafa9c2
commit 006264e77f
Signed by: 00dani
GPG key ID: 3844A6973C6058F1
6 changed files with 27 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/Handler/Home.hs
View file

@ -6,6 +6,9 @@
module Handler.Home where
import Import
import Widget.Hcard (hcard)
getHomeR :: Handler Html
getHomeR = defaultLayout $(widgetFile "home")
getHomeR = do
(Entity _ user) <- runDB . getBy404 $ UniqueUser "dani"
defaultLayout $(widgetFile "home")