summaryrefslogtreecommitdiff
path: root/handlers.rkt
diff options
context:
space:
mode:
Diffstat (limited to 'handlers.rkt')
-rw-r--r--handlers.rkt11
1 files changed, 9 insertions, 2 deletions
diff --git a/handlers.rkt b/handlers.rkt
index 5ff000e..924b2f3 100644
--- a/handlers.rkt
+++ b/handlers.rkt
@@ -14,6 +14,8 @@
(define-values (app-dispatch _)
(dispatch-rules
+ ;; Ferti dashboard
+ [("ferti") #:method "get" ferti]
;; Nutrient measurements
[("measurement" "new") #:method "get" new-measurement]
[("measurement" "create") #:method "post" create-measurement]
@@ -25,12 +27,17 @@
[("") #:method "get" index]
[else fallback]))
-(define (index _)
+(define (ferti _)
(define measurements (get-nutrient-measurements))
(define ferti-recipe (find-ferti-recipe))
(response/xexpr
#:preamble #"<!DOCTYPE html>"
- (index-page measurements ferti-recipe)))
+ (ferti-page measurements ferti-recipe)))
+
+(define (index _)
+ (response/xexpr
+ #:preamble #"<!DOCTYPE html>"
+ (index-page)))
;; Nutrient measurements
Copyright 2019--2026 Marius PETER