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

Remove legacy code

Browse source
This commit is contained in:
Marcus Kammer 2024-07-30 20:22:47 +02:00
parent c4ac64e4bd
commit 889c05b0d3
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 0 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
src/card.lisp
View file

@ -174,21 +174,6 @@ Example:
(text ,body-text) (text ,body-text)
(link (:href ,link-href) ,link-label)))))))) (link (:href ,link-href) ,link-label))))))))
;; Kitchen sink
;; Mix and match multiple content types to create the card you need, or throw
;; everything in there. Shown below are image styles, blocks, text styles, and a
;; list group—all wrapped in a fixed-width card.
(defun card-kitchen-sink ()
(card (img (:src "..."))
(body (card-title "Card title")
(card-text "Some quick example text to build on the card title and make up the bulk of the card's content."))
(dev.metalisp.sbt-list-group (:content "An item")
(:content "A second item")
(:content "A third item"))
(body (card-link "Card Link")
(card-link "Another Link"))))
(defmacro with-card (header &optional items &body body) (defmacro with-card (header &optional items &body body)
"Creates a Bootstrap card with a header, optional list items, and additional content." "Creates a Bootstrap card with a header, optional list items, and additional content."
`(spinneret:with-html `(spinneret:with-html