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

Add docstring

Browse source
This commit is contained in:
Marcus Kammer 2025-02-20 15:14:55 +01:00
parent d86e5024df
commit 7bda4dd0fa
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/models/survey.lisp
View file

@ -47,6 +47,8 @@
(cdr (assoc "description" (survey-properties survey) :test #'string-equal)))
(defmethod survey-questionnaires ((survey survey) &optional make-fn)
"Returns questionnaires data related to SURVEY.
MAKE-FN: Function which is applied to the questionnaire data structure. Can be used to create a object."
(let ((files (survey-data-dir-files survey)))
(mapcar (lambda (file)
(with-open-file (in file)