|
|
|
@ -1,14 +1,14 @@
|
|
|
|
|
(ns dda.masto-embed.app
|
|
|
|
|
(:require ["mastodon-api" :as Mastodon]
|
|
|
|
|
[clojure.pprint :as pprint :refer [pprint]]
|
|
|
|
|
[cljs.core.async :refer [go]]
|
|
|
|
|
[cljs.core.async.interop :refer-macros [<p!]]))
|
|
|
|
|
(:require ["mastodon-api" :as Mastodon]
|
|
|
|
|
[clojure.pprint :as pprint :refer [pprint]]
|
|
|
|
|
[cljs.core.async :refer [go]]
|
|
|
|
|
[cljs.core.async.interop :refer-macros [<p!]]))
|
|
|
|
|
|
|
|
|
|
(defn get-content-seq [response]
|
|
|
|
|
(map
|
|
|
|
|
#(aget % "content")
|
|
|
|
|
(array-seq
|
|
|
|
|
(aget response "data"))))
|
|
|
|
|
(map
|
|
|
|
|
#(aget % "content")
|
|
|
|
|
(array-seq
|
|
|
|
|
(aget response "data"))))
|
|
|
|
|
|
|
|
|
|
(defn init []
|
|
|
|
|
(let [config (js-obj "api_url" "https://social.meissa-gmbh.de/api/v1/" "access_token" "...")
|
|
|
|
|