summaryrefslogtreecommitdiff
path: root/cgi
diff options
context:
space:
mode:
Diffstat (limited to 'cgi')
-rw-r--r--cgi/index.hs22
1 files changed, 0 insertions, 22 deletions
diff --git a/cgi/index.hs b/cgi/index.hs
deleted file mode 100644
index c01e79d..0000000
--- a/cgi/index.hs
+++ /dev/null
@@ -1,22 +0,0 @@
-{-# LANGUAGE OverloadedStrings #-}
-
-import Settlr.Storage
-import Network.CGI (runCGI, handleErrors, CGIResult, CGI, outputFPS)
-import Text.Blaze.Html5 (Html, (!))
-import qualified Text.Blaze.Html5 as H
-import qualified Text.Blaze.Html5.Attributes as A
-import Text.Blaze.Html.Renderer.Utf8 (renderHtml)
-
-page :: Html
-page = H.docTypeHtml $ do
- H.head $ do
- H.title "Test"
- H.meta ! A.charset "utf-8"
- H.body $ do
- H.p "Hello, world!"
-
-cgiMain :: CGI CGIResult
-cgiMain = outputFPS $ renderHtml page
-
-main :: IO ()
-main = runCGI (handleErrors cgiMain)