getPostsR :: Handler Html
getPostsR = do
    (map entityVal -> posts) <- runDB $ selectList [] [Desc PostCreated]
    standardLayout $ do
        setDtekTitle "Gamla inlägg"
        $(widgetFile "posts")

getPostsR :: Handler Html
getPostsR = do
    (map entityVal -> posts) <- runDB $ selectList [] [Desc PostCreated]
    standardLayout $ do
        setDtekTitle "Gamla inlägg"
        $(widgetFile "posts")
getPostsR = do
    (map entityVal -> posts) <- runDB $ selectList [] [Desc PostCreated]
    standardLayout $ do
        setDtekTitle "Gamla inlägg"
        $(widgetFile "posts")