Compare commits

...

2 commits

Author SHA1 Message Date
0f940aaaef inspect the team 2023-06-16 16:06:28 +02:00
7d7a6ead9b mv test to aprop folder 2023-06-16 15:53:10 +02:00
3 changed files with 11 additions and 6 deletions

View file

@ -16,4 +16,4 @@
[com.cognitect/transit-clj "1.0.333"]]
:main ^:skip-aot activity-pub-poc.core
:target-path "target/%s"
:profiles {:uberjar {:aot :all}})
:profiles {})

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))