diff options
author | Tom Faulhaber <git_net@infolace.com> | 2009-08-07 23:43:39 -0700 |
---|---|---|
committer | Tom Faulhaber <git_net@infolace.com> | 2009-08-07 23:43:39 -0700 |
commit | db7ac3aa9a5de29ac9c0107a21a790f90104ad3f (patch) | |
tree | 3742d80f59d4841be7972b8a9622c3c31099cb91 /src/clojure/contrib/logging.clj | |
parent | 90f7ea1dec4e7c835cf3a7f98e67c4e02d7d0f64 (diff) |
Fixes #12; log-system ref is now always returned.
Diffstat (limited to 'src/clojure/contrib/logging.clj')
-rw-r--r-- | src/clojure/contrib/logging.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/clojure/contrib/logging.clj b/src/clojure/contrib/logging.clj index 7432b34b..7c530658 100644 --- a/src/clojure/contrib/logging.clj +++ b/src/clojure/contrib/logging.clj @@ -145,8 +145,8 @@ (let [system @system-ref log ((system :get-log) log-ns)] (if ((system :enabled?) log level) - (do ((system :write) log level (force message) throwable) - system-ref)))) + ((system :write) log level (force message) throwable)) + system-ref)) (def #^{:doc |