{-# LANGUAGE TemplateHaskell #-} module Data.OpenApi.Compare.Report.Html.Template ( template, ) where import Control.Monad.Identity import Data.ByteString (ByteString) import Data.FileEmbed import Data.Text (Text) import qualified Data.Text.Encoding as T import Text.DocTemplates template :: Template Text template = either error id . runIdentity . compileTemplate "" $ "\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \\ \

CompaREST

\ \
\ \$body$\ \
\ \\ \" awsmCss :: ByteString awsmCss = $(makeRelativeToProject "awsm-css/dist/awsm.min.css" >>= embedFile)