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

Fix body-header

Browse source
This commit is contained in:
Marcus Kammer 2024-08-03 11:45:51 +02:00
parent b289519b9f
commit 6c2148662a
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/new-survey.lisp
View file

@ -26,7 +26,7 @@
"Generates the view to create a new survey." "Generates the view to create a new survey."
(let ((questionnaires (list-questionnaires))) (let ((questionnaires (list-questionnaires)))
(with-page (:title "New Survey") (with-page (:title "New Survey")
(body-header "New Survey" (body-header t "New Survey"
(with-navbar (:brand "ml-survey" :active-item "New Survey") (with-navbar (:brand "ml-survey" :active-item "New Survey")
"Home" "/" "New Survey" "/new-survey")) "Home" "/" "New Survey" "/new-survey"))
(body-main t (body-main t