meissa/mastodon-bot
Archived
7
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

added and error check when fetching Mastodon timeline

Browse source
This commit is contained in:
dmitri.sotnikov@gmail.com 2019-01-06 10:57:03 -05:00
parent 0fb72210ac
commit 9a97681a3c
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
mastodon-bot.cljs
View file

@ -119,7 +119,11 @@
(post-status status-text (not-empty ids))))) (post-status status-text (not-empty ids)))))
(defn get-mastodon-timeline [callback] (defn get-mastodon-timeline [callback]
(.then (.get mastodon-client "timelines/home" #js {}) #(-> % .-data js->edn callback))) (.then (.get mastodon-client "timelines/home" #js {})
#(let [response (-> % .-data js->edn)]
(if-let [error (:error response)]
(exit-with-error error)
(callback response)))))
(defn post-items [last-post-time items] (defn post-items [last-post-time items]
(doseq [{:keys [text media-links]} (->> items (doseq [{:keys [text media-links]} (->> items