marcuskammer/dev.metalisp.sbt
1
1
Fork 0
Code Issues 1 Pull requests Projects 1 Releases Packages Wiki Activity Actions

Use if instead of when

Browse source
This commit is contained in:
Marcus Kammer 2024-11-05 17:08:13 +01:00
parent 6772dc38b3
commit fc36868147
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/card.lisp
View file

@ -201,13 +201,13 @@ Example:
`(spinneret:with-html `(spinneret:with-html
(:div :class ,col-class (:div :class ,col-class
(:div :class ,sizing-class (:div :class ,sizing-class
,@(when card-image ,@(if card-image
`((:img :class "card-img-top" `((:img :class "card-img-top"
:src ,(car card-image) :src ,(car card-image)
:alt ,(cdr card-image)))) :alt ,(cdr card-image))))
,@(when card-header ,@(if card-header
`((:h5 :class "card-header" ,card-header))) `((:h5 :class "card-header" ,card-header)))
,@(when card-items ,@(if card-items
`((with-list-group ,card-items t))) `((with-list-group ,card-items t)))
(:div :class "card-body" (:div :class "card-body"
,card-body))))))) ,card-body)))))))