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

Fix code indentation

Browse source
This commit is contained in:
Marcus Kammer 2024-05-31 11:20:57 +02:00
parent 0bc0919597
commit cd26142b47
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/main.lisp
View file

@ -99,7 +99,8 @@
(define-easy-handler (survey :uri #'survey-uri) () (define-easy-handler (survey :uri #'survey-uri) ()
(let* ((id (subseq (hunchentoot:request-uri*) (length "/survey/"))) (let* ((id (subseq (hunchentoot:request-uri*) (length "/survey/")))
(survey (assoc (parse-integer id) (load-response (make-surveys-db-path))))) (survey (assoc (parse-integer id)
(load-response (make-surveys-db-path)))))
(ml-survey/pages:survey survey))) (ml-survey/pages:survey survey)))
(define-easy-handler (new-survey :uri "/new-survey") nil (define-easy-handler (new-survey :uri "/new-survey") nil