Fix log-fast to work with current API

stuartsierra · Jan 13, 2017 · ba27579 · ba27579
1 parent f873eb3
commit ba27579
Showing 1 changed file with 4 additions and 5 deletions.
diff --git a/test/com/stuartsierra/log/dev_test.clj b/test/com/stuartsierra/log/dev_test.clj
@@ -126,11 +126,10 @@
   possible. Returns a function to stop logging. Use for testing file
   rotation."
   []
-  (let [running? (atom true)]
+  (let [running? (atom true)
+        logger (org.slf4j.LoggerFactory/getLogger "dev")]
     (future
       (while @running?
-        (let [impls (gen/sample gen-impl 100)
-              levels (gen/sample gen-level 100)
-              messages (gen/sample (gen/resize 100 gen/string-alpha-numeric) 100)]
-          (dorun (map emit-log impls levels messages)))))
+        (doseq [message (gen/sample (gen/resize 100 gen/string-alpha-numeric) 100)]
+          (.debug logger message))))
     (fn [] (reset! running? false))))