[clojure-contrib commit] r941 - condition: fix regex in print-stack-trace

[codesite...@google.com]

Author: scgilardi
Date: Sat Jun 13 20:11:41 2009
New Revision: 941

Modified:
trunk/src/clojure/contrib/condition.clj

Log:
condition: fix regex in print-stack-trace

Modified: trunk/src/clojure/contrib/condition.clj
==============================================================================
--- trunk/src/clojure/contrib/condition.clj (original)
+++ trunk/src/clojure/contrib/condition.clj Sat Jun 13 20:11:41 2009
@@ -111,7 +111,7 @@
(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)