|
7 | 7 | [taoensso.encore :as enc :refer [have have?]] |
8 | 8 | [taoensso.timbre.appenders.core :as core-appenders] |
9 | 9 |
|
10 | | - #?(:clj [io.aviso.exception :as aviso-ex]) |
11 | | - #?(:cljs [goog.i18n.DateTimeFormat :as dtf])) |
| 10 | + #?(:clj [clj-commons.format.exceptions :as fmt-ex]) |
| 11 | + #?(:cljs [goog.i18n.DateTimeFormat :as dtf])) |
12 | 12 |
|
13 | 13 | #?(:cljs (:require-macros [taoensso.timbre]))) |
14 | 14 |
|
|
489 | 489 |
|
490 | 490 | #?(:clj |
491 | 491 | (def ^:private default-stacktrace-fonts |
492 | | - (enc/get-env {:as :edn} |
| 492 | + (enc/get-env |
| 493 | + {:as :edn |
| 494 | + :default clj-commons.format.exceptions/default-fonts} |
493 | 495 | [:taoensso.timbre.default-stacktrace-fonts<.edn> ; Undocumented |
494 | | - :timbre-defaut-stacktrace-fonts<.edn> ; Legacy |
| 496 | + :timbre-defaut-stacktrace-fonts<.edn> ; Legacy |
495 | 497 | ]))) |
496 | 498 |
|
497 | 499 | (defn default-output-error-fn |
498 | 500 | "Default (fn [data]) -> string, used by `default-output-fn` to |
499 | 501 | generate output for `:?err` value in log data. |
500 | 502 |
|
501 | 503 | For Clj: |
502 | | - Uses `io.aviso/pretty` to return an attractive stacktrace. |
| 504 | + Uses `org.clj-commons/pretty` to return an attractive stacktrace. |
503 | 505 | Options: |
504 | | - :stacktrace-fonts ; See `io.aviso.exception/*fonts*` |
| 506 | + :stacktrace-fonts ; See `clj-commons.format.exceptions/*fonts*` |
505 | 507 |
|
506 | 508 | For Cljs: |
507 | 509 | Returns simple stacktrace string." |
|
522 | 524 | (assoc data :?err c)))))) |
523 | 525 |
|
524 | 526 | :clj |
525 | | - (let [stacktrace-fonts ; nil->{} |
526 | | - (if-let [e (find output-opts :stacktrace-fonts)] |
527 | | - (let [st-fonts (val e)] |
528 | | - (if (nil? st-fonts) |
529 | | - {} |
530 | | - st-fonts)) |
531 | | - default-stacktrace-fonts)] |
532 | | - |
533 | | - (if-let [fonts stacktrace-fonts] |
534 | | - (binding [aviso-ex/*fonts* fonts] |
535 | | - (do (aviso-ex/format-exception err))) |
536 | | - (do (aviso-ex/format-exception err))))))) |
| 527 | + (binding [fmt-ex/*fonts* |
| 528 | + (get output-opts :stacktrace-fonts |
| 529 | + default-stacktrace-fonts)] |
| 530 | + (fmt-ex/format-exception err))))) |
537 | 531 |
|
538 | 532 | (comment |
539 | 533 | (default-output-error-fn |
|
0 commit comments