diff options
Diffstat (limited to 'handlers.rkt')
| -rw-r--r-- | handlers.rkt | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/handlers.rkt b/handlers.rkt index 62c575b..b33318c 100644 --- a/handlers.rkt +++ b/handlers.rkt @@ -111,8 +111,8 @@ (render-page (new-measurement-page))) (define (create-measurement req) - (define-values (measured-on nutrient-values) (formlet-process (measurements-formlet) req)) - (create-nutrient-measurement! measured-on nutrient-values) + (define-values (measurement-date nutrient-values) (formlet-process (measurements-formlet) req)) + (create-nutrient-measurement! measurement-date nutrient-values) (redirect-to "/ferti/measurements")) (define (show-measurement _ id) |