Avoid reflection in assert-throws macro.

mmcgrana · Dec 6, 2009 · 7474501 · 7474501
1 parent 04a849b
commit 7474501
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/clj_unit/core_assertions.clj b/src/clj_unit/core_assertions.clj
@@ -91,7 +91,7 @@
       ~form
       (failure "Expecting throw, got none")
       (catch ~klass e#
-        (let [e-message# (.getMessage e#)]
+        (let [e-message# (.getMessage #^Exception e#)]
           (assert-truth (or (not ~message-re) (re-match? ~message-re e-message#))
             (format "Expected message matching \"%s\" got \"%s\""
               ~message-re e-message#))))