close writer even if (.write) call throws

Author: kumarshantanu

ring-core-protocols/src/ring/core/protocols.clj

@@ -53,10 +53,9 @@
       (.close)))
   clojure.lang.ISeq
   (write-body-to-stream [body response output-stream]
-    (let [writer (response-writer response output-stream)]
+    (with-open [writer (response-writer response output-stream)]
       (doseq [chunk body]
-        (.write writer (str chunk)))
-      (.close writer)))
+        (.write writer (str chunk)))))
   java.io.InputStream
   (write-body-to-stream [body _ ^OutputStream output-stream]
     (with-open [body body]