[Racket] Ferti hydroponic nutrient solver, redux.
Redirect to /ferti after creating a measurement or target.
handlers.rkt
@@ -48,7 +48,7 @@
48
48
(define (create-measurement req)
49
49
(define-values (measured-on measurements) (formlet-process (measurements-formlet) req))
50
50
(create-nutrient-measurement! measured-on measurements)
51
Removed:
(redirect-to "/"))
51
Added:
(redirect-to "/ferti"))
52
52
53
53
(define (destroy-measurement req)
54
54
(delete-nutrient-measurement! req)
@@ -62,7 +62,7 @@
62
62
(define (create-target req)
63
63
(define-values (effective-on nutrient-values) (formlet-process (targets-formlet) req))
64
64
(create-nutrient-target! effective-on nutrient-values)
65
Removed:
(redirect-to "/"))
65
Added:
(redirect-to "/ferti"))
66
66
67
67
(define (fallback _)
68
68
(response/xexpr #:preamble #"<!DOCTYPE html>" (fallback-page 404)))