From 1695fb6d2ac4995e053bee9dcdd9db6d8257f464 Mon Sep 17 00:00:00 2001
From: Coin Okay <cbeok@protonmail.com>
Date: Fri, 24 Apr 2020 18:49:09 -0500
Subject: formatting

---
 decoders.lisp | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'decoders.lisp')

diff --git a/decoders.lisp b/decoders.lisp
index 9878b44..1e282e2 100644
--- a/decoders.lisp
+++ b/decoders.lisp
@@ -114,10 +114,11 @@ becomes   (:content-disposition (:name \"file\" :filename \"mypic.png\"))")
          (<<result parts)))
 
 (defun decode-multipart/form-data (stream content-type content-length)
-  (let* ((boundary (concatenate 'string "--"
+  (let* ((boundary (concatenate 'string
+                                "--"
                                 (second (split-sequence:split-sequence #\= content-type))))
          (stream (make-instance 'replay-streams:static-text-replay-stream
-                                :text (read-body-to-string stream content-length)))) ; Wouldn't work with raw stream
+                                :text (read-body-to-string stream content-length)))) 
     (parse stream (<<multipart/form-data boundary))))
 
 (add-decoder "multipart/form-data" #'decode-multipart/form-data)
@@ -135,4 +136,5 @@ becomes   (:content-disposition (:name \"file\" :filename \"mypic.png\"))")
                  :appending (list (make-keyword key)
                                   (urldecode undecoded :queryp t))))))
 
-(add-decoder "application/x-www-form-urlencoded" #'decode-application/x-www-form-urlencoded)
+(add-decoder "application/x-www-form-urlencoded"
+             #'decode-application/x-www-form-urlencoded)
-- 
cgit v1.2.3