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

Enable addition content for footer

Browse source
This commit is contained in:
Marcus Kammer 2023-07-20 20:10:06 +02:00
parent ff5f1d8bf4
commit 8db0657245
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
examples/album.lisp
View file

@ -142,7 +142,7 @@ Example usage:
(if color (apply #'cl-sbt/utility:color color) "") (if color (apply #'cl-sbt/utility:color color) "")
(if spacing (apply #'cl-sbt/utility:spacing spacing) "")) (if spacing (apply #'cl-sbt/utility:spacing spacing) ""))
(con nil (con nil
,@(destructuring-bind (&key copyright) rest ,@(destructuring-bind (&key copyright content) rest
`((:p :class "float-end mb-1" `((:p :class "float-end mb-1"
(:a :href "#" "Back to top")) (:a :href "#" "Back to top"))
(:p :class "mb-1" (:p :class "mb-1"
@ -151,7 +151,8 @@ Example usage:
"New to Bootstrap? " "New to Bootstrap? "
(:a :href "/" "Visit the homepage") (:a :href "/" "Visit the homepage")
" or read our " " or read our "
(:a :href "/docs/5.3/getting-started/introduction/" "getting started guide")))))))) (:a :href "/docs/5.3/getting-started/introduction/" "getting started guide"))
,content))))))
(defmacro hero (&rest rest) (defmacro hero (&rest rest)
"Generates a Bootstrap hero unit. "Generates a Bootstrap hero unit.