blob: 34ca80bc1dacaceb3dcbbe3d9cb7af9dae6530ba (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
module Main where
import Prelude
import Config as Config
import Effect (Effect)
import Effect.Exception (throw)
import Main.API as API
import Main.Auth as Auth
import Main.Button as Button
import Main.Extension as Extension
import Main.Greencircle as Greencircle
import Main.Menu as Menu
import Main.OBS as OBS
import Main.Pubnix as Pubnix
import Main.Register as Register
import Main.Throwshade as Throwshade
main :: Effect Unit
main = case Config.mode of
"api" -> API.main
"pubnix" -> Pubnix.main
"extension" -> Extension.main
"obs" -> OBS.main
"button" -> Button.main
"register" -> Register.main
"menu" -> Menu.main
"auth" -> Auth.main
"greencircle" -> Greencircle.main
"throwshade" -> Throwshade.main
_ -> throw $ "unknown mode: " <> Config.mode
|
