Skip to content
Permalink
Browse files

landing: hamlet

  • Loading branch information...
3v0k4 committed Jul 1, 2019
1 parent ea3cd86 commit 5271b5f514782f659c89101ee0c1cd4f8d691ade
Showing with 12 additions and 1 deletion.
  1. +10 −1 src/Handler/Landing.hs
  2. +2 −0 templates/landing.hamlet
@@ -1,6 +1,15 @@
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE MultiParamTypeClasses #-}
{-# LANGUAGE TypeFamilies #-}

module Handler.Landing where

import Import

getLandingR :: Handler Html
getLandingR = error "Not yet implemented: getLandingR"
getLandingR = do
defaultLayout $ do
let interpolated = "interpolated string" :: Text
$(widgetFile "landing")
@@ -0,0 +1,2 @@
<h1>
Landing #{interpolated}

0 comments on commit 5271b5f

Please sign in to comment.
You can’t perform that action at this time.