This commit is contained in:
Michele Guerini Rocco 2015-06-29 21:42:12 +02:00
parent dc84ecf71a
commit 9f0e3c902c

View File

@ -5,9 +5,9 @@ module Views where
import Data.Text (Text) import Data.Text (Text)
import Data.Text.Lazy (toStrict) import Data.Text.Lazy (toStrict)
import Text.Blaze.Html.Renderer.Text (renderHtml) import Text.Blaze.Html.Renderer.Text (renderHtml)
import Text.Blaze.Html5 as H import Text.Blaze.Html5 as H
import Text.Blaze.Html5.Attributes as A import Text.Blaze.Html5.Attributes as A
import qualified Web.Spock.Safe as S import qualified Web.Spock.Safe as S
render :: Html -> S.ActionT IO () render :: Html -> S.ActionT IO ()
render = S.html . toStrict . renderHtml render = S.html . toStrict . renderHtml