From 836bf556193a8e9556ca77f0c5d43bdc76844f75 Mon Sep 17 00:00:00 2001 From: Peter Taoussanis Date: Thu, 1 Oct 2020 12:55:32 +0200 Subject: [PATCH] [#321] Make `level>=` a public implementation detail --- src/taoensso/timbre.cljc | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/taoensso/timbre.cljc b/src/taoensso/timbre.cljc index 9c351f23..782f4c39 100644 --- a/src/taoensso/timbre.cljc +++ b/src/taoensso/timbre.cljc @@ -259,8 +259,9 @@ (defn- valid-level->int [x] (or (level->int x) (throw (ex-info err {:given x :type (type x)}))))) (let [valid-level->int valid-level->int] - (defn- #?(:clj level>= :cljs ^:boolean level>=) [x y] - (>= ^long (valid-level->int x) ^long (valid-level->int y)))) + (defn #?(:clj level>= :cljs ^:boolean level>=) + "Implementation detail." + [x y] (>= ^long (valid-level->int x) ^long (valid-level->int y)))) (comment (qb 1e6 (level>= :info :trace))) ; 89.77