[fix] compatible with hy 1.0.0
Some checks failed
/ run-pytest (push) Failing after 35s

This commit is contained in:
SouthFox 2024-09-30 00:42:10 +08:00
parent 92a8ecffd6
commit 00d71d43ed

View file

@ -5,18 +5,18 @@
(import app.httpsig [auth])
(defn/a fetch
(defn :async fetch
[url]
(.info logger url)
(return (.json
(with/a [client (.AsyncClient httpx)]
(with [:async client (.AsyncClient httpx)]
(let [headers {"User-Agent" config.USER_AGENT
"Accept" config.AP_CONTENT_TYPE}]
(await (.get client url :headers headers :timeout 15)))))))
(defn/a post
(defn :async post
[url payload]
(with/a [client (.AsyncClient httpx)]
(with [:async client (.AsyncClient httpx)]
(let [headers {"User-Agent" config.USER_AGENT
"Content-Type" config.AP_CONTENT_TYPE}]
(setv resp