extract lock object outside function

taoensso · Jan 31, 2021 · c8d3a52 · c8d3a52
1 parent c429e77
commit c8d3a52
Showing 1 changed file with 8 additions and 7 deletions.
diff --git a/src/taoensso/timbre/appenders/core.cljc b/src/taoensso/timbre/appenders/core.cljc
@@ -97,13 +97,14 @@
 
      (have? enc/nblank-str? fname)
 
-     {:enabled? true
-      :fn
-      (fn self [data]
-        (if locking?
-          (locking (Object.)
-            (write-to-file data fname append? self))
-          (write-to-file data fname append? self)))}))
+     (let [lock (Object.)]
+       {:enabled? true
+        :fn
+        (fn self [data]
+          (if locking?
+            (locking lock
+              (write-to-file data fname append? self))
+            (write-to-file data fname append? self)))})))
 
 (comment
   (spit-appender)