Clean docs and add todo

This commit is contained in:
Marcus Kammer 2023-07-09 14:20:39 +02:00
parent 1f4dea1ca7
commit fc09761cc4
Signed by: marcuskammer
GPG key ID: C374817BE285268F

View file

@ -1,10 +1,10 @@
;; https://getbootstrap.com/docs/5.3/components/badge/ ;; https://getbootstrap.com/docs/5.3/components/badge/
;; TODO Write a macro which defines every possible badge macro
(in-package :cl-sbt) (in-package :cl-sbt)
(defmacro badge ((&key (classes nil)) &body body) (defmacro badge ((&key (classes nil)) &body body)
"https://getbootstrap.com/docs/5.3/components/badge/
Documentation and examples for badges, our small count and labeling component."
`(spinneret:with-html `(spinneret:with-html
(:span :class (concatenate 'string "badge " ,classes) (:span :class (concatenate 'string "badge " ,classes)
,@body))) ,@body)))