From fc0e6eaedea91cfc5d8a9e4f4cecfbccf8140918 Mon Sep 17 00:00:00 2001 From: jem Date: Mon, 8 Jun 2020 19:59:34 +0200 Subject: [PATCH] move filter to transform only --- src/main/mastodon_bot/mastodon_api.cljs | 5 +---- src/main/mastodon_bot/transform.cljs | 6 +++--- 2 files changed, 4 insertions(+), 7 deletions(-) diff --git a/src/main/mastodon_bot/mastodon_api.cljs b/src/main/mastodon_bot/mastodon_api.cljs index 7d6555d..f9a2178 100755 --- a/src/main/mastodon_bot/mastodon_api.cljs +++ b/src/main/mastodon_bot/mastodon_api.cljs @@ -93,11 +93,8 @@ (defn-spec post-items any? [mastodon-auth mastodon-auth? target mastodon-target? - last-post-time any? items any?] - (doseq [{:keys [text media-links]} - (->> items - (filter #(> (:created-at %) last-post-time)))] + (doseq [{:keys [text media-links]} items] (if media-links (post-status-with-images mastodon-auth target text media-links) (when-not (:media-only? target) diff --git a/src/main/mastodon_bot/transform.cljs b/src/main/mastodon_bot/transform.cljs index 39080d6..0e76bc8 100644 --- a/src/main/mastodon_bot/transform.cljs +++ b/src/main/mastodon_bot/transform.cljs @@ -155,7 +155,7 @@ (map #(twitter/nitter-url source %)) (map #(perform-replacements transformation %)) (map #(intermediate-to-mastodon mastodon-auth target %)) - (masto/post-items mastodon-auth target last-post-time)))))) + (masto/post-items mastodon-auth target)))))) (defn-spec tweets-to-mastodon any? [mastodon-auth masto/mastodon-auth? @@ -188,7 +188,7 @@ (remove #(blocked-content? transformation (:text %))) (map #(perform-replacements transformation %)) (map #(intermediate-to-mastodon mastodon-auth target %)) - (masto/post-items mastodon-auth target last-post-time)))))) + (masto/post-items mastodon-auth target)))))) (defn-spec tumblr-to-mastodon any? [mastodon-auth masto/mastodon-auth? @@ -221,7 +221,7 @@ (map #(intermediate-resolve-urls resolve-urls? %)) (map #(perform-replacements transformation %)) (map #(intermediate-to-mastodon mastodon-auth target %)) - (masto/post-items mastodon-auth target last-post-time))))) + (masto/post-items mastodon-auth target))))) (defn-spec rss-to-mastodon any?