Filter boosts from account status

This commit is contained in:
bom 2024-05-10 11:21:18 +02:00
parent 93b1faff6a
commit 9f75c9ed0d

View file

@ -57,11 +57,12 @@
(<p! (api/get-directory host-url))
api/mastojs->edn
(filter #(= account-name (:acct %)))
(infra/debug)
(map :id)
first)))
out))
; (infra/debug)
(defn account-mode [host-url account-name]
(go
(let [account-id (<! (find-account-id host-url account-name))
@ -69,6 +70,7 @@
(<p! (api/get-account-statuses host-url account-id))
api/mastojs->edn)]
(->> statuus
(filter #(= nil (:reblog %)))
(take 4)
(masto->html)
(render-html)