learn usage of thread-last
This commit is contained in:
parent
418ff67282
commit
2187df1058
1 changed files with 4 additions and 4 deletions
|
@ -114,10 +114,10 @@
|
|||
([mastodon-config status-text media-ids callback]
|
||||
(let [{:mastodon-bot.mastodon-api/keys [sensitive? signature visibility]} mastodon-config]
|
||||
(-> (.post (mastodon-client mastodon-config) "statuses"
|
||||
(clj->js (merge {:status (-> status-text
|
||||
(partial resolve-urls mastodon-config)
|
||||
(partial perform-replacements mastodon-config)
|
||||
(partial set-signature mastodon-config))}
|
||||
(clj->js (merge {:status (->> status-text
|
||||
(resolve-urls mastodon-config)
|
||||
(perform-replacements mastodon-config)
|
||||
(set-signature mastodon-config))}
|
||||
(when media-ids {:media_ids media-ids})
|
||||
(when sensitive? {:sensitive sensitive?})
|
||||
(when visibility {:visibility visibility}))))
|
||||
|
|
Reference in a new issue