Reduce SQL requests for main Ferti page.

1 files changed, 3 insertions, 3 deletions

diff --git a/views.rkt b/views.rkt
index 7e4f4d9..b661499 100644
--- a/views.rkt
+++ b/views.rkt
@@ -84,7 +84,7 @@
 
 ;; Pages
 
-(define (ferti-page measurements ferti-recipe)
+(define (ferti-page ferti-recipe latest-measurement-hash latest-target-hash measurements)
   (page-template
    "Ferti"
    `((h1 ((class "display-1 mb-3")) "Ferti")
@@ -112,8 +112,8 @@
                 (th ((class "text-end")) "Dernière Cible")
                 (th ((class "text-end")) "Delta (%)"))
             ,@(for/list ([n (get-nutrients)])
-                (define latest-target (get-latest-nutrient-target-value n))
-                (define latest-measurement (get-latest-nutrient-measurement-value n))
+                (define latest-measurement (hash-ref latest-measurement-hash n #f))
+                (define latest-target (hash-ref latest-target-hash n #f))
                 (define delta-percentage
                   (cond
                     [(false? latest-target) #f]