diff options
| author | Tom Faulhaber <git_net@infolace.com> | 2009-12-11 00:07:33 -0800 |
|---|---|---|
| committer | Tom Faulhaber <git_net@infolace.com> | 2009-12-11 00:07:33 -0800 |
| commit | e5b7819ef66410a87b8072417dc2f09ac4ddb03f (patch) | |
| tree | 2b5c6187133f4adeace1662d5cec6e574a3b5c2d /src/clojure/contrib/condition.clj | |
| parent | eb73c54687a9ed63dc939bbe886170f4a47455ed (diff) | |
Changed all instances of ^x across contrib to (meta x) since the ^x form is being deprecated in 1.1
refs #48
Diffstat (limited to 'src/clojure/contrib/condition.clj')
| -rw-r--r-- | src/clojure/contrib/condition.clj | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/clojure/contrib/condition.clj b/src/clojure/contrib/condition.clj index 8df8acff..98aa589a 100644 --- a/src/clojure/contrib/condition.clj +++ b/src/clojure/contrib/condition.clj @@ -94,8 +94,8 @@ http://groups.google.com/group/clojure/browse_frm/thread/da1285c538f22bb5"} ~@code (catch Condition c# (binding [*condition-object* c# - *condition* ^c# - *selector* (~dispatch-fn ^c#)] + *condition* (meta c#) + *selector* (~dispatch-fn (meta c#))] (cond ~@(mapcat (fn [[_ key & body]] @@ -117,7 +117,7 @@ http://groups.google.com/group/clojure/browse_frm/thread/da1285c538f22bb5"} (defmethod stack-trace-info Condition [condition] - (stack-trace-info ^condition)) + (stack-trace-info (meta condition))) (defmethod stack-trace-info Throwable [throwable] |