Align module name with web resource

Instead of survey/ use questionnaire/ resource name.
This commit is contained in:
Marcus Kammer 2025-02-16 09:06:03 +01:00
parent 98ab858167
commit 8cee7a5e6b
Signed by: marcuskammer
GPG key ID: C374817BE285268F
3 changed files with 3 additions and 3 deletions

View file

@ -2,7 +2,7 @@
(defsystem "dev.metalisp.survey"
:description "Create questionnaires and analyze the results."
:version "0.5.20"
:version "0.5.21"
:author "Marcus Kammer <marcus.kammer@mailbox.org>"
:source-control (:git "https://code.metalisp.dev/marcuskammer/dev.metalisp.survey.git")
:licence "MIT"

View file

@ -47,7 +47,7 @@
(cdr (assoc "description" (survey-properties survey) :test #'string-equal)))
(defun build-questionnaire-link (survey-id resource)
(format nil "/survey/~a~a" survey-id resource))
(format nil "/questionnaire/~a~a" survey-id resource))
(defmethod survey-html ((survey survey))
(spinneret:with-html

View file

@ -5,7 +5,7 @@
"Check if the request URI matches the pattern '/survey/<numeric>/lang/type'"
(let ((parts (ml-survey/app:split-uri uri)))
(and (= (length parts) 4)
(string= (first parts) "survey")
(string= (first parts) "questionnaire")
(every #'digit-char-p (second parts))
(= 2 (length (third parts))))))