[Racket] Ferti hydroponic nutrient solver, redux.
1
#lang racket
2
3
(require web-server/dispatch
4
racket/runtime-path
5
gregor
6
"handlers.rkt"
7
"db/conn.rkt"
8
"db/migrations.rkt"
9
"db/seed.rkt")
10
11
(define-runtime-path development-db-path "storage/development.sqlite3")
12
(module+ main
13
(parameterize ([current-timezone "Europe/Paris"]
14
[current-locale "FR"])
15
(connect! #:path development-db-path)
16
(migrate-all!)
17
(seed-database!)
18
(serve/dispatch (production-dispatch))))
19