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

Enable calling nps assessment

Browse source
This commit is contained in:
Marcus Kammer 2024-12-02 19:42:49 +01:00
parent 521dac7652
commit b540eca93c
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/assessment/assessment.lisp
View file

@ -115,7 +115,8 @@ ENTRY: Entry from a response."
(defun create-assessment (type responses)
(ecase type
(:visawi (make-instance 'visawi-assessment :responses responses))
(:sus (make-instance 'sus-assessment :responses responses))))
(:sus (make-instance 'sus-assessment :responses responses))
(:nps (make-instance 'nps-assessment :responses responses))))
(defun parse-assessments (categorized-responses)
(loop for (type data) on categorized-responses by #'cddr