Specify log level explicitly.
This commit is contained in:
parent
9ccf17ac7f
commit
d6f2884c23
|
@ -289,7 +289,7 @@
|
||||||
(comp to-uuid :id))))))
|
(comp to-uuid :id))))))
|
||||||
|
|
||||||
(defn connect [& {:keys [hostname logger credentials]
|
(defn connect [& {:keys [hostname logger credentials]
|
||||||
:or { logger (log/print-logger) }}]
|
:or { logger (log/print-logger :error :notify) }}]
|
||||||
(if credentials
|
(if credentials
|
||||||
(let [authenticator (make-request-authenticator credentials)]
|
(let [authenticator (make-request-authenticator credentials)]
|
||||||
(reify-exchange-account-client {::http/client (http/json-client :authenticator authenticator
|
(reify-exchange-account-client {::http/client (http/json-client :authenticator authenticator
|
||||||
|
|
Loading…
Reference in New Issue