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

Fix identation

Browse source
This commit is contained in:
Marcus Kammer 2024-04-03 15:18:52 +02:00
parent 8cecf9ff42
commit b20794ddde
1 changed files with 4 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/pattern/questionnaire.lisp
View file

@ -304,7 +304,9 @@ Example German:
:method "post" :method "post"
:class ,class-string :class ,class-string
,@(loop for q in body ,@(loop for q in body
for (ask group choices) = (multiple-value-list (extract-question-components q)) for (ask group choices) = (multiple-value-list
collect `(question ,ask ,group ,@(split-list-by-keyword choices))) (extract-question-components q))
collect `(question ,ask ,group
,@(split-list-by-keyword choices)))
(btn-primary (:type "submit") (btn-primary (:type "submit")
(find-l10n "submit" spinneret:*html-lang* *l10n*)))))) (find-l10n "submit" spinneret:*html-lang* *l10n*))))))