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)]