diff options
| author | Coin Okay <cbeok@protonmail.com> | 2020-04-24 17:39:58 -0500 |
|---|---|---|
| committer | Coin Okay <cbeok@protonmail.com> | 2020-04-24 17:39:58 -0500 |
| commit | 45e0812d602f5c2cae845ba0cb280b94291ed860 (patch) | |
| tree | dc00cfdcaec6b9cd48a69d44901e73c1f9fe65de | |
| parent | 0840e0e6928b0225d955e6f12b656bd028d06ed0 (diff) | |
tweak to keep compiler from complaining about unused variable
| -rw-r--r-- | decoders.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/decoders.lisp b/decoders.lisp index a772133..d6bb7d6 100644 --- a/decoders.lisp +++ b/decoders.lisp @@ -110,7 +110,7 @@ becomes (:content-disposition (:name \"file\" :filename \"mypic.png\"))") (<<let ((parts (<<and (<<string boundary) <crlf< (<<+ (<<multipart/form-data-part boundary)))) - (ending (<<and (<<string "--") <crlf<)) ) + (_ending (<<and (<<string "--") <crlf<)) ) (<<result parts))) (defun decode-multipart/form-data (stream content-type content-length) |