使用clojure liberator发布请求

我正在使用clojure liberator将我的服务公开为REST服务，我有一个POST请求，下面是代码，我可以以POST的形式调用该服务，但我想将事件id作为POST的响应发送回去，有人能帮忙吗

(defresource send-event-resource
 :method-allowed? (request-method-in :post)
  :available-media-types ["text/plain"]
  :post! (fn [context]
           (workers/send-event context)))

---

在《解放者》中提出了一个问题，得到了回应

---

将事件id放入上下文映射，并从句柄ok中查找：

(defresource send-event-resource
  :method-allowed? (request-method-in :post)
  :available-media-types ["text/plain"]
  :post! (fn [context] {::event-id (workers/send-event context)})
  :handle-ok ::event-id)

上面的代码利用了clojure关键字是一个函数的事实，当应用于上下文映射时，它将查找“自身”