Fix capture-console on node

This commit is contained in:
Juho Teperi 2018-07-11 13:33:24 +03:00
parent 73b1efd5b3
commit 5024223280

View file

@ -2,18 +2,14 @@
(defn capture-console [f] (defn capture-console [f]
(let [messages (atom []) (let [messages (atom [])
original-console js/console original-console-warn js/console.warn
log (fn [t & message] log (fn [t & message]
(swap! messages conj {:type t (swap! messages conj {:type t
:message message})) :message message}))
value (try value (try
(set! js/console #js {:log (partial log :log) (set! js/console.warn (partial log :warn))
:warn (partial log :warn)
:info (partial log :info)
:error (partial log :error)
:debug (partial log :debug)})
(f) (f)
(finally (finally
(set! js/console original-console)))] (set! js/console.warn original-console-warn)))]
{:value value {:value value
:messages @messages})) :messages @messages}))