wip: currently rewriting the project as a full stack application
tangled.org/kacaii.dev/sigo
gleam
:truck: rename `mist_pool_child` to `mist_builder`
+6
-6
+6
-6
src/app/supervision_tree.gleam
+6
-6
src/app/supervision_tree.gleam
···
9
9
import wisp
10
10
import wisp/wisp_mist
11
11
12
+
/// Alias for a mist http request
12
13
type Request =
13
14
request.Request(mist.Connection)
14
15
16
+
/// Alias for a mist http response
15
17
type Response =
16
18
response.Response(mist.ResponseData)
17
19
···
23
25
secret_key_base secret_key_base: String,
24
26
registry_name registry_name: process.Name(_),
25
27
) -> Result(actor.Started(supervisor.Supervisor), actor.StartError) {
26
-
// Handler for the web server
27
-
let webserver_handler = fn(req) {
28
+
let handle_request = fn(req: Request) {
28
29
case wisp.path_segments(req) {
29
30
["ws"] -> ws_handler(req)
30
31
_ -> wisp_mist.handler(wisp_handler, secret_key_base)(req)
31
32
}
32
33
}
33
34
34
-
// Adding Mist to the supervision tree
35
-
let mist_pool_child =
36
-
webserver_handler
35
+
let mist_builder =
36
+
handle_request
37
37
|> mist.new
38
38
|> mist.bind("0.0.0.0")
39
39
|> mist.port(8000)
···
41
41
// Starting supervision
42
42
supervisor.new(supervisor.OneForOne)
43
43
|> supervisor.add(pog.supervised(pog_config))
44
-
|> supervisor.add(mist.supervised(mist_pool_child))
44
+
|> supervisor.add(mist.supervised(mist_builder))
45
45
|> supervisor.add(group_registry.supervised(registry_name))
46
46
|> supervisor.start
47
47
}