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

Handle/report twitter errors

Browse source
This commit is contained in:
Arnout Engelen 2020-03-22 11:33:48 +01:00
parent d72b755485
commit 981444ad7c
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
mastodon_bot/core.cljs
View file

@ -179,9 +179,11 @@
(defn post-tweets [last-post-time] (defn post-tweets [last-post-time]
(fn [error tweets response] (fn [error tweets response]
(->> (js->edn tweets) (if (nil? error)
(map parse-tweet) (->> (js->edn tweets)
(post-items last-post-time)))) (map parse-tweet)
(post-items last-post-time))
(exit-with-error error))))
(defn strip-utm [news-link] (defn strip-utm [news-link]
(first (string/split news-link #"\?utm"))) (first (string/split news-link #"\?utm")))