minimalLayout :: Widget -> Handler Html
minimalLayout widget = do
    muser <- fmap entityVal <$> maybeAuth
    siteMenu <- pageBody <$> widgetToPageContent $(widgetFile "site-menu")
    pc <- widgetToPageContent widget
    withUrlRenderer $(hamletFile "templates/site-layout-minimal.hamlet")


-- How to run database actions.
minimalLayout :: Widget -> Handler Html
minimalLayout widget = do
    muser <- fmap entityVal <$> maybeAuth
    siteMenu <- pageBody <$> widgetToPageContent $(widgetFile "site-menu")
    pc <- widgetToPageContent widget
    withUrlRenderer $(hamletFile "templates/site-layout-minimal.hamlet")


-- How to run database actions.
minimalLayout widget = do
    muser <- fmap entityVal <$> maybeAuth
    siteMenu <- pageBody <$> widgetToPageContent $(widgetFile "site-menu")
    pc <- widgetToPageContent widget
    withUrlRenderer $(hamletFile "templates/site-layout-minimal.hamlet")


-- How to run database actions.