diff options
Diffstat (limited to 'apex/Ibb.hs')
-rw-r--r-- | apex/Ibb.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/apex/Ibb.hs b/apex/Ibb.hs index 973960c..c626f3f 100644 --- a/apex/Ibb.hs +++ b/apex/Ibb.hs @@ -29,6 +29,7 @@ main = do port <- read <$> fromMaybe "3000" <$> lookupEnv "PORT" :: IO Int + say "port: 3000" run port $ logStdout $ compress $ app where compress = gzip def { gzipFiles = GzipCompress } @@ -42,14 +43,14 @@ instance L.ToHtml a => L.ToHtml (HtmlPage a) where L.doctypehtml_ $ do L.head_ $ do L.meta_ [L.charset_ "utf-8"] - jsRef "/static/app.js" + jsRef "/static/all.js" L.body_ (L.toHtml x) where jsRef href = L.with (L.script_ mempty) [ makeAttribute "src" href , makeAttribute "type" "text/javascript" - -- , makeAttribute "async" mempty - -- , makeAttribute "defer" mempty + , makeAttribute "async" mempty + , makeAttribute "defer" mempty ] type ServerRoutes = ToServerRoutes Routes HtmlPage Action |