Fix #216

CHANGELOG.md

@@ -9,6 +9,14 @@
     controller is interested in, as data, which should cover most
     use cases: `{:start start-fn, :parameters {:path [:foo-id]}}`
 
+## `reitit-ring`
+
+* Allow Middleware to compile to `nil` with Middleware Registries, fixes to [#216](https://github.com/metosin/reitit/issues/216).
+
+## `reitit-http`
+
+* Allow Interceptors to compile to `nil` with Interceptor Registries, related to [#216](https://github.com/metosin/reitit/issues/216).
+
 ## 0.2.13 (2019-01-26)
 
 * Don't throw `StringIndexOutOfBoundsException` with empty path lookup on wildcard paths, fixes [#209](https://github.com/metosin/reitit/issues/209)

modules/reitit-core/src/reitit/interceptor.cljc

@@ -33,8 +33,8 @@
   #?(:clj  clojure.lang.Keyword
      :cljs cljs.core.Keyword)
   (into-interceptor [this data {:keys [::registry] :as opts}]
-    (or (if-let [interceptor (if registry (registry this))]
+    (if-let [interceptor (if registry (registry this))]
-          (into-interceptor interceptor data opts))
+      (into-interceptor interceptor data opts)
       (throw
         (ex-info
           (str

modules/reitit-core/src/reitit/middleware.cljc

@@ -17,8 +17,8 @@
   #?(:clj  clojure.lang.Keyword
      :cljs cljs.core.Keyword)
   (into-middleware [this data {:keys [::registry] :as opts}]
-    (or (if-let [middleware (if registry (registry this))]
+    (if-let [middleware (if registry (registry this))]
-          (into-middleware middleware data opts))
+      (into-middleware middleware data opts)
       (throw
         (ex-info
           (str

test/cljc/reitit/interceptor_test.cljc

@@ -78,6 +78,10 @@
                 #"Interceptor :enter not found in registry"
                 (create [:enter]))))
 
+        (testing "existing keyword, compiling to nil"
+          (let [app (create [:enter] {::interceptor/registry {:enter {:compile (constantly nil)}}})]
+            (is (= [:ok] (app ctx)))))
+
         (testing "as map"
           (reset! calls 0)
           (let [app (create [{:enter (:enter (enter :value))}])]

test/cljc/reitit/middleware_test.cljc

@@ -65,6 +65,10 @@
                 #"Middleware :wrap not found in registry"
                 (create [:wrap]))))
 
+        (testing "existing keyword, compiling to nil"
+          (let [app (create [:wrap] {::middleware/registry {:wrap {:compile (constantly nil)}}})]
+            (is (= [:ok] (app request)))))
+
         (testing "as function vector with value(s)"
           (reset! calls 0)
           (let [app (create [[wrap :value]])]