diff options
| author | scgilardi <scgilardi@gmail.com> | 2009-06-14 03:11:41 +0000 |
|---|---|---|
| committer | scgilardi <scgilardi@gmail.com> | 2009-06-14 03:11:41 +0000 |
| commit | e5b8687a48644f14e0a46f7c5918b129af907564 (patch) | |
| tree | 010b54d26de6af497c88b2052830901d841b4542 /src | |
| parent | d5fc2809405d09e46e6b92933c28747b3e579860 (diff) | |
condition: fix regex in print-stack-trace
Diffstat (limited to 'src')
| -rw-r--r-- | src/clojure/contrib/condition.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clojure/contrib/condition.clj b/src/clojure/contrib/condition.clj index 0b450aa4..4d7ad422 100644 --- a/src/clojure/contrib/condition.clj +++ b/src/clojure/contrib/condition.clj @@ -111,7 +111,7 @@ http://groups.google.com/group/clojure/browse_frm/thread/da1285c538f22bb5"} (let [classname (.getClassName frame)] (if (or *full-stack-traces* (not (re-matches - #"clojure.(?:core|lang|main)[.$].+" classname))) + #"clojure.(?:core|lang|main).*" classname))) (printf " at %s/%s(%s:%s)\n" classname (.getMethodName frame) |