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

Remove form-header function

Browse source
This commit is contained in:
Marcus Kammer 2024-05-26 17:20:20 +02:00
parent 13956348ad
commit 2dee894ec7
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 0 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
src/pages.lisp
View file

@ -1,15 +1,5 @@
(in-package :dev.metalisp.survey)
(defun form-header ()
(spinneret:with-html
(:nav :class (concatenate 'string
"navbar bg-body-tertiary"
" "
(spacing :property "m" :side "b" :size 5))
(:div :class "container"
(:a :class "navbar-brand" :href "#"
(:img :src *company-logo* :alt "Company Logo" :width 100))))))
(defun sus-form-en ()
(with-page (:title "SUS Form" :main-con t)
(navbar*