diff options
| author | Stuart Sierra <mail@stuartsierra.com> | 2009-05-07 14:00:52 +0000 |
|---|---|---|
| committer | Stuart Sierra <mail@stuartsierra.com> | 2009-05-07 14:00:52 +0000 |
| commit | 04e75388259a68da9884633c5cf0a29c0ada4d92 (patch) | |
| tree | 1615bd9461622db1f70f06f10c6e4c1f187201a4 /src/clojure | |
| parent | c7798360fcec57ce691aabb472cf4fdada568767 (diff) | |
test_is.clj: fix wrong # of arguments to report on thrown-with-msg?
Diffstat (limited to 'src/clojure')
| -rw-r--r-- | src/clojure/contrib/test_is.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/test_is.clj b/src/clojure/contrib/test_is.clj index cce68275..56ddf431 100644 --- a/src/clojure/contrib/test_is.clj +++ b/src/clojure/contrib/test_is.clj @@ -701,7 +701,7 @@ Chas Emerick, Allen Rohner, and Stuart Halloway", re (nth form 2) body (nthnext form 3)] `(try ~@body - (report :fail ~msg '~form nil) + (report {:type :fail, :message ~msg, :expected '~form, :actual nil}) (catch ~klass e# (let [m# (.getMessage e#)] (if (re-matches ~re m#) |