meissa/dda-masto-embed
6
0
Fork 0
Code Issues Pull requests Projects Releases 3 Packages Wiki Activity

Add debug function

Browse source
This commit is contained in:
erik 2024-05-15 16:12:21 +02:00
parent afb4152500
commit ed7c2a1f5f
1 changed files with 14 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
src/main/dda/masto_embed/account_mode.cljs
View file

@ -76,3 +76,17 @@
(masto->html) (masto->html)
(render-html) (render-html)
(b/render-to-document))))) (b/render-to-document)))))
; Execute in browser repl to get some infos about incoming data
(defn account-mode-debug [host-url account-name]
(go
(let [account-id (<! (find-account-id host-url account-name))
statuus (->
(<p! (api/get-account-statuses host-url account-id))
api/mastojs->edn)]
(->> statuus
(filter #(= nil (:reblog %)))
(filter #(= nil (:in_reply_to_account_id %)))
(take 4)
(infra/debug)
))))