blob: e8f56b3112cefe10d358df6234476c73c807ece3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
;;;; 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
#:authenticate
#:authorize
#:handle
#:not-found
#:slot-required
#:not-found
#:redirect
#:endpoint-redirect
#:route-to
#:get-cookie
;; re-exports
#:mime-type
#:handle-static-file
#:set-cookie
;; METACLASS
#:endpoint
#:register-body-parser))
|
