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

Update questionnaire docstring

Browse source
This commit is contained in:
Marcus Kammer 2024-02-05 10:26:59 +01:00
parent 9bd02b29cd
commit abe7847ab1
1 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
src/pattern/questionnaire.lisp
View file

@ -281,13 +281,20 @@ Example 2:
Example 3: Example 3:
(questionnaire \"/submit\" (questionnaire \"/submit\"
(:ask \"Which social media platforms do you use regularly?\" (:ask \"Which social media platforms do you use regularly?\"
:group \"age\" :group \"socialmedia\"
:choices (:multiple \"Facebook\" \"Twitter\" \"Instagram\"))) :choices (:multiple \"Facebook\" \"Twitter\" \"Instagram\")))
Example 4: Example 4:
(questionnaire \"/submit\" (questionnaire \"/submit\"
(:ask \"Which social media platforms do you use regularly?\" (:ask \"Which social media platforms do you use regularly?\"
:group \"age\" :group \"socialmedia\"
:choices (:multiple \"Facebook\" \"Twitter\" \"Instagram\" :text \"Others\")))" :choices (:multiple \"Facebook\" \"Twitter\" \"Instagram\" :text \"Others\")))
It is also possible to write the keys in another language:
Example German:
(questionnaire \"/submit\"
(:frage \"Welche Social Media-Plattformen nutzen Sie regelmäßig?\"
:gruppe \"sozialemedien\"
:auswahl (:multiple \"Facebook\" \"Twitter\" \"Instagram\" :text \"Andere\")))"
(let ((class-string (spacing :property "p" :side "y" :size 5))) (let ((class-string (spacing :property "p" :side "y" :size 5)))
`(spinneret:with-html `(spinneret:with-html
(:form :action ,action (:form :action ,action