diff options
author | Ben Sima <ben@bsima.me> | 2019-08-29 06:26:52 -0700 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2019-08-29 06:26:52 -0700 |
commit | 7a0e9725e691bd84cda8f6b169414581e5e1d4f1 (patch) | |
tree | 7be077badb2cc362a03fc73459a708e8a5ba3c88 /apex/Ibb.hs | |
parent | cac8297fa42721e09d96614c1b16ab17d2c383d0 (diff) |
implement Network.RemoteData
Diffstat (limited to 'apex/Ibb.hs')
-rw-r--r-- | apex/Ibb.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/apex/Ibb.hs b/apex/Ibb.hs index dd26d96..973960c 100644 --- a/apex/Ibb.hs +++ b/apex/Ibb.hs @@ -10,11 +10,11 @@ module Ibb where import Alpha import Biz.Ibb import Data.Maybe (fromMaybe) -import Data.Proxy import qualified Lucid as L import Lucid.Base import Miso import Network.HTTP.Types +import Network.RemoteData import Network.Wai import Network.Wai.Application.Static import Network.Wai.Handler.Warp @@ -25,7 +25,7 @@ import System.Environment (lookupEnv) main :: IO () main = do - say "running" + say "running: ibb" port <- read <$> fromMaybe "3000" <$> lookupEnv "PORT" :: IO Int |