luciano/babashka
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

wip

Browse source
This commit is contained in:
Michiel Borkent 2024-03-15 15:40:29 +01:00
parent 82fa81fefb
commit b2b16783ed
3 changed files with 7 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
deps.edn
View file

@ -45,7 +45,7 @@
hiccup/hiccup {:mvn/version "2.0.0-RC1"} hiccup/hiccup {:mvn/version "2.0.0-RC1"}
rewrite-clj/rewrite-clj {:mvn/version "1.1.47"} rewrite-clj/rewrite-clj {:mvn/version "1.1.47"}
selmer/selmer {:mvn/version "1.12.59"} selmer/selmer {:mvn/version "1.12.59"}
com.taoensso/timbre {:mvn/version "6.0.1"} com.taoensso/timbre {:mvn/version "6.5.0"}
org.clojure/tools.logging {:mvn/version "1.1.0"} org.clojure/tools.logging {:mvn/version "1.1.0"}
org.clojure/data.priority-map {:mvn/version "1.1.0"} org.clojure/data.priority-map {:mvn/version "1.1.0"}
insn/insn {:mvn/version "0.5.2"} insn/insn {:mvn/version "0.5.2"}

9
feature-logging/babashka/impl/logging.clj
View file

@ -37,7 +37,7 @@
:keys [loc level msg-type args vargs :keys [loc level msg-type args vargs
config ?err ?base-data spying?] config ?err ?base-data spying?]
:or :or
{config `*config* {config 'taoensso.timbre/*config*
?err :auto}}] ?err :auto}}]
(have [:or nil? sequential? symbol?] args) (have [:or nil? sequential? symbol?] args)
@ -55,7 +55,7 @@
(let [vargs-form (let [vargs-form
(or vargs (or vargs
(if (symbol? args) (if (symbol? args)
`(enc/ensure-vec ~args) `(taoensso.timbre/-ensure-vec ~args)
`[ ~@args]))] `[ ~@args]))]
;; Note pre-resolved expansion ;; Note pre-resolved expansion
@ -120,7 +120,7 @@
{} {}
(select-keys (ns-publics ns) ks))) (select-keys (ns-publics ns) ks)))
(def atomic-println @#'appenders/atomic-println) (def atomic-println @#'enc/println-atomic)
(defn println-appender (defn println-appender
"Returns a simple `println` appender for Clojure/Script. "Returns a simple `println` appender for Clojure/Script.
@ -186,7 +186,8 @@
'merge-config! (sci/copy-var merge-config! tns) 'merge-config! (sci/copy-var merge-config! tns)
'set-level! (sci/copy-var set-level! tns) 'set-level! (sci/copy-var set-level! tns)
'println-appender (sci/copy-var println-appender tns) 'println-appender (sci/copy-var println-appender tns)
'-log-and-rethrow-errors (sci/copy-var -log-and-rethrow-errors tns))) '-log-and-rethrow-errors (sci/copy-var -log-and-rethrow-errors tns)
'-ensure-vec (sci/copy-var enc/ensure-vec tns)))
(def timbre-appenders-namespace (def timbre-appenders-namespace
(let [tan (sci/create-ns 'taoensso.timbre.appenders.core nil)] (let [tan (sci/create-ns 'taoensso.timbre.appenders.core nil)]

2
project.clj
View file

@ -74,7 +74,7 @@
:feature/selmer {:source-paths ["feature-selmer"] :feature/selmer {:source-paths ["feature-selmer"]
:dependencies [[selmer/selmer "1.12.59"]]} :dependencies [[selmer/selmer "1.12.59"]]}
:feature/logging {:source-paths ["feature-logging"] :feature/logging {:source-paths ["feature-logging"]
:dependencies [[com.taoensso/timbre "6.0.4"] :dependencies [[com.taoensso/timbre "6.5.0"]
[org.clojure/tools.logging "1.1.0"]]} [org.clojure/tools.logging "1.1.0"]]}
:feature/priority-map {:source-paths ["feature-priority-map"] :feature/priority-map {:source-paths ["feature-priority-map"]
:dependencies [[org.clojure/data.priority-map "1.1.0"]]} :dependencies [[org.clojure/data.priority-map "1.1.0"]]}