Remove form-header function
This commit is contained in:
parent
13956348ad
commit
2dee894ec7
1 changed files with 0 additions and 10 deletions
|
@ -1,15 +1,5 @@
|
||||||
(in-package :dev.metalisp.survey)
|
(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 ()
|
(defun sus-form-en ()
|
||||||
(with-page (:title "SUS Form" :main-con t)
|
(with-page (:title "SUS Form" :main-con t)
|
||||||
(navbar*
|
(navbar*
|
||||||
|
|
Loading…
Add table
Reference in a new issue