diff options
author | Colin Okay <cbeok@protonmail.com> | 2020-08-04 07:38:33 -0500 |
---|---|---|
committer | Colin Okay <cbeok@protonmail.com> | 2020-08-04 07:38:33 -0500 |
commit | 19e0dabf4b957e849169b1932eb1a7e5e5becb3c (patch) | |
tree | cf1cf1b9a1116893462a16c019c6f50f96084c72 /lazybones.lisp | |
parent | 4fc3821dd292d881dd62506f0ae03b22208eb540 (diff) |
clean
Diffstat (limited to 'lazybones.lisp')
-rw-r--r-- | lazybones.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lazybones.lisp b/lazybones.lisp index 8f8a400..fb9e66c 100644 --- a/lazybones.lisp +++ b/lazybones.lisp @@ -172,7 +172,6 @@ an error will be signalled. See also REGISTER-FILE-HANDLER-CONFIG." (constantly t) (lambda (subdir) (dolist (file (uiop:directory-files subdir)) - (print file) (add-route (append key-prefix (clean-split-path (subseq (namestring file) prefix-len))) @@ -325,7 +324,7 @@ CURRENT-HANDLER, allowing for non-local exits via (RETURN-FROM CURRENT-HANDLER . (funcall #'http-err code text)))) ,@body)))) - (if (member method '(:post :put)) + (if (member method '(:post :put :patch)) `(add-route ',key (lambda (*req* ,@arglist) (let ((*body* (decode-body (getf *req* :raw-body) |