inspect the team

This commit is contained in:
Michael Jerger 2023-06-16 16:06:28 +02:00
parent 7d7a6ead9b
commit 0f940aaaef

View file

@ -1,11 +1,16 @@
(ns activity-pub-poc.json-ld
(:require
[hato.client :as http]
[clojure.inspector :as inspector]
[clojure.inspector :as ins]
))
(def team-url "https://social.meissa-gmbh.de/users/team")
(defn json-get [url]
(http/get url
{:headers {"Accept" "application/json"}
:http-client {:redirect-policy :normal}
:as :json-string-keys}))
(:body
(http/get url
{:headers {"Accept" "application/json"}
:http-client {:redirect-policy :normal}
:as :json-string-keys})))
(ins/inspect-tree (json-get team-url))