[Racket] Ferti hydroponic nutrient solver, redux.
Check for database file existence.
main.rkt
@@ -14,6 +14,9 @@
14
14
(printf "Startup error: ~a\n" (exn-message e))
15
15
(exit 1))])
16
16
(connect! #:path development-db-path)
17
Removed:
(migrate-all!)
18
Removed:
(seed-database!)
17
Added:
(if (file-exists? development-db-path)
18
Added:
(printf "Database already exists: ~a" development-db-path)
19
Added:
(begin
20
Added:
(migrate-all!)
21
Added:
(seed-database!)))
19
22
(serve/dispatch secured-dispatch)))