condp = -> case

darkleaf · Oct 21, 2024 · 8c318ed · 8c318ed
1 parent b9c8445
commit 8c318ed
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/darkleaf/di/core.clj b/src/darkleaf/di/core.clj
@@ -624,14 +624,14 @@
           kind      (::kind m (cond has-stop? :component))
           arities   (->> variable arglists (map count))]
       (case kind
-        :component (condp = arities
+        :component (case arities
                      [0] (var->0-component variable)
                      [1] (var->1-component variable)
                      (throw (ex-info
                              "The component must only have 0 or 1 arity"
                              {:variable variable
                               :arities  arities})))
-        #_service  (condp = arities
+        #_service  (case arities
                      [0] (var->0-service variable)
                      (var->service variable))))))