aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/protocol.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/protocol.lisp b/src/protocol.lisp
index 3da16ec..cfee809 100644
--- a/src/protocol.lisp
+++ b/src/protocol.lisp
@@ -22,7 +22,7 @@
:initarg :note
:type (or null string))
(status-code
- :qreader status-code
+ :reader status-code
:initform nil
:initarg :status-code
:type (or nil (integer 100 599))))
@@ -199,7 +199,7 @@ AUTHORIZE while handling endpoint-class instance EP."
"Redirect to another endpoint. CLASS can be either a symbol or a
class. KWARGS is a PLIST of keyword arguments supplied to the
CLASS' route builder function."
- (redirect (apply #'route-to class kwargs)))
+ (redirect (apply 'route-to class kwargs)))
(defun get-cookie (name)
"Returns the cookie with name NAME the actively"