diff options
author | Ben Sima <ben@bsima.me> | 2020-12-30 12:20:07 -0500 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2020-12-30 12:20:07 -0500 |
commit | f0895bfd73c53d9d5d9811c632d8e6f5e99dc0d4 (patch) | |
tree | 29c446dc76c8c4f14cea67189c3d91ad0b1db4cc /Biz/Ibb/Client.hs | |
parent | 2d6075d13a9d2cf023cb34a079b0c071af9ee650 (diff) |
Remove Biz/Ibb
Diffstat (limited to 'Biz/Ibb/Client.hs')
-rw-r--r-- | Biz/Ibb/Client.hs | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/Biz/Ibb/Client.hs b/Biz/Ibb/Client.hs deleted file mode 100644 index efe4e84..0000000 --- a/Biz/Ibb/Client.hs +++ /dev/null @@ -1,39 +0,0 @@ -{-# LANGUAGE RecordWildCards #-} -{-# LANGUAGE NoImplicitPrelude #-} - --- | Front-end --- --- : out ibb.js --- --- : dep clay --- : dep miso --- : dep protolude --- : dep servant --- : dep text --- : dep aeson --- : dep containers --- : dep ghcjs-base -module Biz.Ibb.Client where - -import Alpha -import Biz.Ibb.Core - ( Action (..), - init, - see, - ) -import Biz.Ibb.Move (move) -import Miso - ( App (..), - defaultEvents, - miso, - ) - -main :: IO () -main = miso <| \u -> App {model = init u, ..} - where - initialAction = FetchPeople - update = move - view = see - events = defaultEvents - subs = [] - mountPoint = Nothing |