From 20a4bcf49bea106e4d0f0c694cee8c55778f565d Mon Sep 17 00:00:00 2001 From: Justin Balthrop Date: Sat, 6 Aug 2016 14:34:06 -0700 Subject: [PATCH] allow passing response-predicate to wrap-restful-format --- src/ring/middleware/format_response.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/ring/middleware/format_response.clj b/src/ring/middleware/format_response.clj index 35be76b..5ed70a4 100644 --- a/src/ring/middleware/format_response.clj +++ b/src/ring/middleware/format_response.clj @@ -175,10 +175,10 @@ + **:handle-error** is a fn with a sig [exception request response]. Defaults to just rethrowing the Exception" [handler & args] - (let [{:keys [predicate encoders charset binary? handle-error]} (impl/extract-options args) + (let [{:keys [response-predicate predicate encoders charset binary? handle-error]} (impl/extract-options args) charset (or charset default-charset-extractor) handle-error (or handle-error default-handle-error) - predicate (or predicate serializable?)] + predicate (or response-predicate predicate serializable?)] (fn [req] (let [{:keys [headers body] :as response} (handler req)] (try