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 | |
| parent | 4fc3821dd292d881dd62506f0ae03b22208eb540 (diff) | |
clean
| -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) |