From fc7e748ac8980804b5c2a33d2e2678227112df91 Mon Sep 17 00:00:00 2001 From: Peter Taoussanis Date: Mon, 24 Feb 2025 10:28:23 +0100 Subject: [PATCH] [nop] Stop using optimised `binding` by default The improved performance rarely matters in practice, and can cause issues for folks using deep-walking macros. Better solution would be to eventually get the optimisation implemented upstream in Clojure core. --- main/src/taoensso/telemere.cljc | 4 ++-- main/src/taoensso/telemere/impl.cljc | 3 +-- main/src/taoensso/telemere/streams.clj | 3 +-- 3 files changed, 4 insertions(+), 6 deletions(-) diff --git a/main/src/taoensso/telemere.cljc b/main/src/taoensso/telemere.cljc index 8425477..bfa7795 100644 --- a/main/src/taoensso/telemere.cljc +++ b/main/src/taoensso/telemere.cljc @@ -5,9 +5,9 @@ " {:author "Peter Taoussanis (@ptaoussanis)"} - (:refer-clojure :exclude [binding newline]) + (:refer-clojure :exclude [newline]) (:require - [taoensso.encore :as enc :refer [binding have have?]] + [taoensso.encore :as enc :refer [have have?]] [taoensso.encore.signals :as sigs] [taoensso.telemere.impl :as impl] [taoensso.telemere.utils :as utils] diff --git a/main/src/taoensso/telemere/impl.cljc b/main/src/taoensso/telemere/impl.cljc index b26ee30..e84d061 100644 --- a/main/src/taoensso/telemere/impl.cljc +++ b/main/src/taoensso/telemere/impl.cljc @@ -1,10 +1,9 @@ (ns ^:no-doc taoensso.telemere.impl "Private ns, implementation detail. Signal design shared by: Telemere, Tufte, Timbre." - (:refer-clojure :exclude [binding]) (:require [clojure.set :as set] - [taoensso.encore :as enc :refer [binding have have?]] + [taoensso.encore :as enc :refer [have have?]] [taoensso.encore.signals :as sigs]) #?(:cljs diff --git a/main/src/taoensso/telemere/streams.clj b/main/src/taoensso/telemere/streams.clj index 11fab1f..a9d0b31 100644 --- a/main/src/taoensso/telemere/streams.clj +++ b/main/src/taoensso/telemere/streams.clj @@ -1,8 +1,7 @@ (ns taoensso.telemere.streams "Interop support for standard stream/s -> Telemere." - (:refer-clojure :exclude [binding]) (:require - [taoensso.encore :as enc :refer [binding have have?]] + [taoensso.encore :as enc :refer [have have?]] [taoensso.telemere.impl :as impl])) (enc/defonce ^:private orig-*out* "Original `*out*` on ns load" *out*)