;;;; package.lisp (defpackage #:weekend (:use #:cl #:flatbind) (:import-from #:hunchentoot #:mime-type #:handle-static-file #:set-cookie) (:local-nicknames (#:http #:hunchentoot) (#:a #:alexandria-2) (#:mop #:closer-mop)) (:export ;; HANDLER PROTOCOL #:check-request-compliance #:slot-value-mapper #:authenticate #:authorize #:handle #:not-found #:slot-required #:not-found #:redirect #:endpoint-redirect #:route-to #:get-cookie #:get-header #:err ;; re-exports #:mime-type #:handle-static-file #:set-cookie ;; METACLASS #:endpoint #:register-body-parser #:defendpoint ;; DOCGEN #:print-route-documentation #:print-all-route-documentation ;; ENDPOINT CLASS UTILITY FUNCTIONS #:route-builder-parts #:class-initargs #:body-expected-p #:request-method #:set-response-type ))