aboutsummaryrefslogtreecommitdiff
path: root/src/protocol.lisp
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2024-10-27 17:38:34 -0700
committercolin <colin@cicadas.surf>2024-10-27 17:38:34 -0700
commitb180b49f8c6611878cd40781967d35abf787b423 (patch)
tree93f75970bf2939895eae5fc7a26f3a586b03ac1e /src/protocol.lisp
parent9f06805a9aa7d28c250367597e10219da80f704b (diff)
typos
Diffstat (limited to 'src/protocol.lisp')
-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"