dev.metalisp.survey/package.lisp

50 lines
1.2 KiB
Common Lisp
Raw Normal View History

2024-05-31 09:43:02 +02:00
(defpackage ml-survey
(:use #:cl)
(:import-from #:hunchentoot
2024-06-02 10:44:24 +02:00
#:easy-acceptor)
2024-06-01 11:40:06 +02:00
(:export
#:*app*
2024-06-05 16:45:38 +02:00
#:set-default-directory
2024-06-01 11:40:06 +02:00
#:start-server
#:stop-server
2024-06-02 10:44:24 +02:00
#:restart-server))
2024-05-28 17:34:09 +02:00
2024-06-02 10:44:24 +02:00
(defpackage ml-survey/views
2024-05-28 17:34:09 +02:00
(:use #:cl)
(:import-from #:spinneret
#:*html*
#:*html-lang*)
(:import-from #:dev.metalisp.sbt
#:find-l10n)
(:import-from #:dev.metalisp.sbt
#:*l10n*)
2024-05-28 17:34:09 +02:00
(:import-from #:dev.metalisp.sbt/btn
#:btn
#:btn-primary)
(:import-from #:dev.metalisp.sbt
#:with-page)
(:import-from #:dev.metalisp.sbt/form
#:multi-form)
2024-05-31 19:27:45 +02:00
(:export #:index
#:imprint
#:new-survey
#:surveys
#:create-survey
2024-06-01 21:36:04 +02:00
#:survey
2024-06-02 10:44:24 +02:00
#:questionnaire-submit
#:sus-form-de
#:sus-form-en))
(defpackage ml-survey/handlers
(:use #:cl)
(:import-from #:spinneret
#:*html*
#:*html-lang*)
(:import-from #:hunchentoot
#:define-easy-handler
#:post-parameters*
#:content-type*
#:request-uri
#:request-uri*
#:*request*))