From 4bc7b5822b2c69dfe918b18fb0c08cf3406d2958 Mon Sep 17 00:00:00 2001 From: Marius Peter Date: Thu, 20 Nov 2025 11:28:55 +0100 Subject: Reduce SQL requests for main Ferti page. --- handlers.rkt | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'handlers.rkt') diff --git a/handlers.rkt b/handlers.rkt index 7fcd004..da56161 100644 --- a/handlers.rkt +++ b/handlers.rkt @@ -31,10 +31,13 @@ (define ferti-recipe (find-ferti-recipe)) (define latest-measurement-hash (get-latest-nutrient-measurement-hash)) (define latest-target-hash (get-latest-nutrient-target-hash)) - (define latest-measurements (take* (get-nutrient-measurements) 10)) + (define latest-measurements (take (get-nutrient-measurements) 10)) (response/xexpr #:preamble #"" - (ferti-page ferti-recipe latest-measurement-hash latest-target-hash latest-measurements))) + (ferti-page ferti-recipe + latest-measurement-hash + latest-target-hash + latest-measurements))) (define (index _) (define user (get-current-user)) -- cgit v1.2.3