diff options
| -rw-r--r-- | models/nutrient.rkt | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/models/nutrient.rkt b/models/nutrient.rkt index 1103aac..4748083 100644 --- a/models/nutrient.rkt +++ b/models/nutrient.rkt @@ -65,10 +65,10 @@ (nutrient id canonical-name french-name formula)) (define (get-nutrients) - (define rows - (query-rows (current-conn) - (select id canonical_name french_name formula #:from nutrients #:order-by id #:asc))) - (map row->nutrient rows)) + (map row->nutrient + (query-rows + (current-conn) + (select id canonical_name french_name formula #:from nutrients #:order-by id #:asc)))) (define (get-nutrient #:id [id #f] #:name [canonical-name #f] #:formula [formula #f]) (define where |