summaryrefslogtreecommitdiff
path: root/apex/Ibb.hs
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2019-08-29 06:26:52 -0700
committerBen Sima <ben@bsima.me>2019-08-29 06:26:52 -0700
commit7a0e9725e691bd84cda8f6b169414581e5e1d4f1 (patch)
tree7be077badb2cc362a03fc73459a708e8a5ba3c88 /apex/Ibb.hs
parentcac8297fa42721e09d96614c1b16ab17d2c383d0 (diff)
implement Network.RemoteData
Diffstat (limited to 'apex/Ibb.hs')
-rw-r--r--apex/Ibb.hs4
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