From fb8b08f5036882f40f0a9bd5e18bc944d09f53f8 Mon Sep 17 00:00:00 2001 From: Marius Peter Date: Thu, 20 Nov 2025 14:10:25 +0100 Subject: Increase variable naming clarity. --- models/nutrient.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'models/nutrient.rkt') diff --git a/models/nutrient.rkt b/models/nutrient.rkt index d79801f..3e2767b 100644 --- a/models/nutrient.rkt +++ b/models/nutrient.rkt @@ -54,10 +54,10 @@ ;; READ (define (get-nutrients) - (for/list ([(id* name* formula*) + (for/list ([(id name formula) (in-query (current-conn) (select id canonical_name formula #:from nutrients #:order-by id #:asc))]) - (nutrient id* name* formula*))) + (nutrient id name formula))) (define (get-nutrient #:id [id #f] #:name [name #f] #:formula [formula #f]) (define (where-expr) -- cgit v1.2.3