Merge pull request #16 from Bronsa/master

make condp-case actually throw on no matching clause
clj-commons · Jan 8, 2014 · 2ea070f · 2ea070f
2 parents 41d4c10 + 9fa3dbc
commit 2ea070f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/potemkin/utils.clj b/src/potemkin/utils.clj
@@ -76,7 +76,7 @@
                    ~expr)))
              (apply concat))
          :else
-         ~(when-not (even? (count cases))
+         ~(if-not (even? (count cases))
             `(throw (IllegalArgumentException. (str "no matching clause for " (pr-str val##))))
             (last cases))))))