MK
Size: a a a
MK
IG
IG
A
AI
AI
AR
(defmethod ig/init-key ::unpark [_ {:keys [topic producer]}]
(fn [{:keys [body]}]
(let [msg (-> body
(assoc "type" "unpark"))]
(producer topic (get body "agent") msg)
{:status 200
:body {}})))
(defmethod ig/init-key ::store-get [_ {:keys [getters]}]
(fn [{[_ store key] :ataraxy/result}]
(if-let [getter (get getters store)]
{:status 200
:body (getter key)}
{:status 404
:body "Unknown store"})))
IG
AI
MK
(defmethod ig/init-key ::unpark [_ {:keys [topic producer]}]
(fn [{:keys [body]}]
(let [msg (-> body
(assoc "type" "unpark"))]
(producer topic (get body "agent") msg)
{:status 200
:body {}})))
(defmethod ig/init-key ::store-get [_ {:keys [getters]}]
(fn [{[_ store key] :ataraxy/result}]
(if-let [getter (get getters store)]
{:status 200
:body (getter key)}
{:status 404
:body "Unknown store"})))
AI
AR
ИФ
IG
IG
ИФ
MK
IG
MK
IG