📎 Add service result wrapper

Allows attach metadata to values that does not implement the IObj
clojure interface.
This commit is contained in:
Andrey Antukh 2022-09-26 23:59:20 +02:00
parent 47363d96f1
commit 2753a934aa
3 changed files with 23 additions and 5 deletions

View file

@ -31,9 +31,10 @@
(defn- handle-response-transformation
[response request mdata]
(if-let [transform-fn (:transform-response mdata)]
(p/do (transform-fn request response))
(p/resolved response)))
(let [response (if (sv/wrapped? response) @response response)]
(if-let [transform-fn (:transform-response mdata)]
(p/do (transform-fn request response))
(p/resolved response))))
(defn- handle-before-comple-hook
[response mdata]