diff options
| -rw-r--r-- | handlers.rkt | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/handlers.rkt b/handlers.rkt index 6104b66..2dc8060 100644 --- a/handlers.rkt +++ b/handlers.rkt @@ -48,7 +48,7 @@ (define (create-measurement req) (define-values (measured-on measurements) (formlet-process (measurements-formlet) req)) (create-nutrient-measurement! measured-on measurements) - (redirect-to "/")) + (redirect-to "/ferti")) (define (destroy-measurement req) (delete-nutrient-measurement! req) @@ -62,7 +62,7 @@ (define (create-target req) (define-values (effective-on nutrient-values) (formlet-process (targets-formlet) req)) (create-nutrient-target! effective-on nutrient-values) - (redirect-to "/")) + (redirect-to "/ferti")) (define (fallback _) (response/xexpr #:preamble #"<!DOCTYPE html>" (fallback-page 404))) |