Make `log` an alias for `logp`

This commit is contained in:
Peter Taoussanis 2013-07-20 15:15:49 +07:00
parent 95109b7451
commit 7961a8d807
3 changed files with 6 additions and 11 deletions

View File

@ -1,7 +1,7 @@
**[API docs](http://ptaoussanis.github.io/timbre/)** | **[CHANGELOG](https://github.com/ptaoussanis/timbre/blob/master/CHANGELOG.md)** | [contact & contributing](#contact--contributing) | [other Clojure libs](https://www.taoensso.com/clojure-libraries) | [Twitter](https://twitter.com/#!/ptaoussanis) | current [semantic](http://semver.org/) version: **[API docs](http://ptaoussanis.github.io/timbre/)** | **[CHANGELOG](https://github.com/ptaoussanis/timbre/blob/master/CHANGELOG.md)** | [contact & contributing](#contact--contributing) | [other Clojure libs](https://www.taoensso.com/clojure-libraries) | [Twitter](https://twitter.com/#!/ptaoussanis) | current [semantic](http://semver.org/) version:
```clojure ```clojure
[com.taoensso/timbre "2.3.1"] ; See CHANGELOG for breaking changes since 1.x [com.taoensso/timbre "2.3.2"] ; See CHANGELOG for breaking changes since 1.x
``` ```
# Timbre, a (sane) Clojure logging & profiling library # Timbre, a (sane) Clojure logging & profiling library
@ -26,7 +26,7 @@ Logging with Java can be maddeningly, unnecessarily hard. Particularly if all yo
Add the necessary dependency to your [Leiningen](http://leiningen.org/) `project.clj` and `require` the library in your ns: Add the necessary dependency to your [Leiningen](http://leiningen.org/) `project.clj` and `require` the library in your ns:
```clojure ```clojure
[com.taoensso/timbre "2.3.1"] ; project.clj [com.taoensso/timbre "2.3.2"] ; project.clj
(ns my-app (:require [taoensso.timbre :as timbre (ns my-app (:require [taoensso.timbre :as timbre
:refer (trace debug info warn error fatal spy with-log-level)])) ; ns :refer (trace debug info warn error fatal spy with-log-level)])) ; ns
``` ```

View File

@ -1,4 +1,4 @@
(defproject com.taoensso/timbre "2.3.1" (defproject com.taoensso/timbre "2.3.2"
:description "Clojure logging & profiling library" :description "Clojure logging & profiling library"
:url "https://github.com/ptaoussanis/timbre" :url "https://github.com/ptaoussanis/timbre"
:license {:name "Eclipse Public License" :license {:name "Eclipse Public License"

View File

@ -346,19 +346,14 @@
(defmacro log (defmacro log
"When logging is enabled, actually logs given arguments with level-relevant "When logging is enabled, actually logs given arguments with level-relevant
appender-fns." appender-fns using print-style :message."
{:arglists '([level & args] [level throwable & args])} {:arglists '([level & args] [level throwable & args])}
[level & sigs] [level & sigs]
`(when (logging-enabled? ~level) `(when (logging-enabled? ~level)
(log* {} ~level ~sigs nil))) (log* {} ~level ~sigs nil)))
(defmacro logp (defmacro logp {:arglists '([level & message] [level throwable & message])}
"When logging is enabled, actually logs given arguments with level-relevant [& sigs] `(log ~@sigs)) ; Alias
appender-fns using print-style :message."
{:arglists '([level & message] [level throwable & message])}
[level & sigs]
`(when (logging-enabled? ~level)
(log* {} ~level ~sigs print-str)))
(defmacro logf (defmacro logf
"When logging is enabled, actually logs given arguments with level-relevant "When logging is enabled, actually logs given arguments with level-relevant