aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/routes.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/routes.lisp b/src/routes.lisp
index eb66acc..9cef55d 100644
--- a/src/routes.lisp
+++ b/src/routes.lisp
@@ -39,8 +39,8 @@ the METHOD it handles. METHOD may be a keyword or a list of keywords."
`(progn
(let ((entry (assoc ',name *routes-table*)))
(if entry
- (setf (second entry ,(ensure-list method))
- (third entry ,uri))
+ (setf (second entry) ,(ensure-list method)
+ (third entry) ,uri)
(push '(,name ,(ensure-list method) ,uri) *routes-table*)))
(defun ,name (,headers ,uri-bindings)
,@declarations