🐛 Send frontend version on worker http requests

This commit is contained in:
Andrey Antukh 2025-04-22 21:26:51 +02:00
parent b7d7cf233a
commit 3f85e89f62

View file

@ -50,7 +50,8 @@
[headers]
(into {} (map vec) (seq (.entries ^js headers))))
(def default-headers
(defn default-headers
[]
{"x-frontend-version" (:full cfg/version)})
(defn fetch
@ -74,7 +75,7 @@
headers (cond-> headers
(not omit-default-headers)
(d/merge default-headers))
(merge (default-headers)))
headers (-update-headers body headers)