Fix function name
This commit is contained in:
parent
da6da629ed
commit
19d19d1090
2 changed files with 2 additions and 2 deletions
|
@ -2,7 +2,7 @@
|
||||||
|
|
||||||
(defsystem "dev.metalisp.survey"
|
(defsystem "dev.metalisp.survey"
|
||||||
:description "Create questionnaires and analyze the results."
|
:description "Create questionnaires and analyze the results."
|
||||||
:version "0.5.26"
|
:version "0.5.27"
|
||||||
:author "Marcus Kammer <marcus.kammer@mailbox.org>"
|
:author "Marcus Kammer <marcus.kammer@mailbox.org>"
|
||||||
:source-control (:git "https://code.metalisp.dev/marcuskammer/dev.metalisp.survey.git")
|
:source-control (:git "https://code.metalisp.dev/marcuskammer/dev.metalisp.survey.git")
|
||||||
:licence "MIT"
|
:licence "MIT"
|
||||||
|
|
|
@ -20,7 +20,7 @@
|
||||||
(defun process-questionnaire-post (post-params q)
|
(defun process-questionnaire-post (post-params q)
|
||||||
(declare (type questionnaire q))
|
(declare (type questionnaire q))
|
||||||
(setf (questionnaire-post-params q) post-params)
|
(setf (questionnaire-post-params q) post-params)
|
||||||
(questionnaire-write-to-file q)
|
(questionnaire-write-file q)
|
||||||
(view-submit q))
|
(view-submit q))
|
||||||
|
|
||||||
(defun extract-uri-param (param)
|
(defun extract-uri-param (param)
|
||||||
|
|
Loading…
Add table
Reference in a new issue