Remove latest measurement and target delta display.

1 files changed, 2 insertions, 14 deletions

diff --git a/views.rkt b/views.rkt
index cd33cad..b61842d 100644
--- a/views.rkt
+++ b/views.rkt
@@ -104,19 +104,11 @@
     (table ((class "table"))
            (tr (th "Nutriment")
                (th ((class "text-end")) "Dernier Relevé")
-               (th ((class "text-end")) "Dernière Cible")
-               (th ((class "text-end")) "Delta (%)"))
+               (th ((class "text-end")) "Dernière Cible"))
            ,@(for/list ([n (get-nutrients)])
                (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]
-                   [(zero? latest-target) -100]
-                   [(zero? latest-measurement) 100]
-                   [(number? latest-target)
-                    (* 100 (/ (- latest-target latest-measurement) latest-measurement))]))
-               `(tr (td ,(nutrient-name n))
+               `(tr (td ,(nutrient-french-name n))
                     (td ((class "text-end font-monospace"))
                         ,(if latest-measurement
                              (round 2 latest-measurement)
@@ -124,10 +116,6 @@
                     (td ((class "text-end font-monospace"))
                         ,(if latest-target
                              (round 2 latest-target)
-                             "—"))
-                    (td ((class "text-end font-monospace"))
-                        ,(if delta-percentage
-                             (round 1 delta-percentage)
                              "—")))))))
 
 (define (ferti-measurements measurements)