cleanup
This commit is contained in:
parent
9a216f5fa7
commit
dfb1685569
1 changed files with 3 additions and 3 deletions
|
@ -179,11 +179,11 @@
|
||||||
|
|
||||||
(defn post-tweets [last-post-time]
|
(defn post-tweets [last-post-time]
|
||||||
(fn [error tweets response]
|
(fn [error tweets response]
|
||||||
(if (nil? error)
|
(if error
|
||||||
|
(exit-with-error error)
|
||||||
(->> (js->edn tweets)
|
(->> (js->edn tweets)
|
||||||
(map parse-tweet)
|
(map parse-tweet)
|
||||||
(post-items last-post-time))
|
(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")))
|
||||||
|
|
Reference in a new issue