From 30637bdead3d73a563a7d215cd406753bd9a5dea Mon Sep 17 00:00:00 2001 From: niten Date: Mon, 20 Jun 2022 15:41:33 -0700 Subject: [PATCH] Print what we're getting for the auth token --- src/pricebot/core.clj | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/src/pricebot/core.clj b/src/pricebot/core.clj index c1127a0..6510eaa 100644 --- a/src/pricebot/core.clj +++ b/src/pricebot/core.clj @@ -193,6 +193,12 @@ "available: " (pprint-to-string resolved))) :else resolved))) +(defn pthru [label o] + (println (str "************ START " label)) + (clojure.pprint/pprint o) + (println (str "************ END " label)) + o) + (defn -main [& args] (let [required-keys [:exchange-host :currency @@ -206,7 +212,7 @@ bebot-auth-token-file bebot-channel-id notify-user]} (get-args required-keys args)] - (let [logger (bebot-log/make-logger bebot-url (slurp bebot-auth-token-file) bebot-channel-id notify-user) + (let [logger (bebot-log/make-logger bebot-url (pthru "AUTH_TOKEN" (slurp bebot-auth-token-file)) bebot-channel-id notify-user) checks (create-checks logger) bot (reify-bot exchange-host (-> currency str/lower-case keyword)) shutdown (chan)]