[Racket] Ferti hydroponic nutrient solver, redux.
Ensure usage of em-dash if brand-name is absent or empty.
views.rkt
@@ -161,11 +161,11 @@
161
161
(define table
162
162
`(table ((class "table table-striped"))
163
163
(tr (th () "Nom de référence") (th () "Nom de marque"))
164
Removed:
,@(for/list ([fertilizer fertilizers])
165
Removed:
`(tr (td (a ([href
166
Removed:
,(format "/ferti/fertilizers/~a" (fertilizer-product-id fertilizer))])
167
Removed:
,(fertilizer-product-name fertilizer)))
168
Removed:
(td ,(or (fertilizer-brand-name fertilizer) "—"))))))
164
Added:
,@(for/list ([fp fertilizers])
165
Added:
(define brand-name (fertilizer-brand-name fp))
166
Added:
`(tr (td (a ([href ,(format "/ferti/fertilizers/~a" (fertilizer-product-id fp))])
167
Added:
,(fertilizer-product-name fp)))
168
Added:
(td ,(if (and brand-name (non-empty-string? brand-name)) brand-name "—"))))))
169
169
(ferti-template `((h2 () "Intrants") (a ((class "btn btn-primary mb-3") [href
170
170
"/ferti/fertilizers/new"])
171
171
"Ajouter un intrant")