close writer when done

nakkaya · Aug 18, 2012 · e2ef6a8 · e2ef6a8
1 parent f1c2d23
commit e2ef6a8
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/src/inbox_feed/core.clj b/src/inbox_feed/core.clj
@@ -246,9 +246,11 @@
 (defn atomic-dump [_ obj feed-data]
   (try
     (let [data-file (File. feed-data)
-          tmp-file (File. (str feed-data ".tmp"))]
+          tmp-file (File. (str feed-data ".tmp"))
-      (binding [*out* (java.io.FileWriter. tmp-file)]
+          writer (java.io.FileWriter. tmp-file)]
+      (binding [*out* writer]
         (prn obj))
+      (.close writer)
       (.renameTo tmp-file data-file))
     true
     (catch Exception e