Merge pull request #153 from clj-commons/hls/20250812-restore-aviso-bridge

Restore and extend the io.aviso.exception and io.aviso.repl shim namespaces

Author: hlship

CHANGES.md

@@ -1,6 +1,13 @@
+## 3.6.3 -- UNRELEASED
+
+- Restore, at least temporarily, the `io.aviso.exception` and `io.aviso.repl shim` namespaces
+- Add a shim for `io.aviso.exception/*traditional*`
+
+[Closed Issues](https://github.com/clj-commons/pretty/milestone/62?closed=1)
+
 ## 3.6.2 -- 7 Aug 2025
 
-- Fix a bug where the horizontal bar for repeated stack frames could be misaligned
+- Fix a bug where the vertical bar for repeated stack frames could be misaligned
 - Hide `clojure.lang.RestFn` stack frames
 
 [Closed Issues](https://github.com/clj-commons/pretty/milestone/61?closed=1)
@@ -24,7 +31,7 @@ Fix a bug where omitted stack frames were printed.
 * `clj-commons.format.table/print-table`
   * The :default-decorator option is now deprecated
   * New column option :formatter will format a column value to a string or composed string
-  * New :row-deprecator option decorates all columns of a row
+  * New :row-decorator option decorates all columns of a row
   * Column widths may be calculated even from a composed string
 * `clj-commons.format.exceptions`
   * Previously, individual stack frames that repeated were identified; Pretty can now identify _sequences_ of repeating

src/clj_commons/format/exceptions.clj

@@ -371,8 +371,7 @@
 
 (defn- format-clojure-frame-base
   [frame]
-  (let [{:keys [line]} frame
-        names' (->> frame
+  (let [names' (->> frame
                     :names
                     counted-terms
                     (map counted-frame-name))
@@ -401,7 +400,7 @@
 
   Formatting is based on whether the frame is omitted, and whether it is a Clojure or Java frame."
   {:added "0.3.0"}
-  [{:keys [line names] :as frame}]
+  [{:keys [names] :as frame}]
   (cond
     (:omitted frame)
     (assoc frame

src/io/aviso/exception.clj

@@ -0,0 +1,40 @@
+(ns io.aviso.exception
+  "A shim in org.clj-commons/pretty to emulate a few key functions from io.aviso/pretty.
+
+  This namespace may be deleted in a future release."
+  {:added "2.5.0"
+   :deprecated "2.5.0"}
+  (:require [clj-commons.format.exceptions :as e]))
+
+(defn demangle
+  [^String s]
+  (e/demangle s))
+
+(defn format-exception
+  ([exception]
+   (e/format-exception exception))
+  ([exception options]
+   (e/format-exception exception options)))
+
+(defn write-exception
+  ([exception]
+   (e/print-exception exception))
+  ([exception options]
+   (e/print-exception exception options)))
+
+(def ^:dynamic *default-frame-rules*
+  "This is provided only to prevent source compilation failures; changing this value does not affect
+  how the clj-commons.format.exceptions namespace operates."
+  [])
+
+(def ^:dynamic *fonts*
+  "This is provided only to prevent source compilation failures; changing this value does not affect
+  how the clj-commons.format.exceptions namespace operates."
+  {})
+
+(def ^{:dynamic true
+       :added "3.6.3"
+       :deprecated "3.6.3"} *traditional*
+  "This is provided only to prevent source compilation failures; changing this value does not affect
+    how the clj-commons.format.exceptions namespace operates."
+  false)

src/io/aviso/repl.clj

@@ -0,0 +1,15 @@
+(ns io.aviso.repl
+  "A shim in org.clj-commons/pretty to emulate a few key functions from io.aviso/pretty.
+
+  This namespace may be deleted in a future release."
+  {:added "2.5.0"
+   :deprecated "2.5.0"}
+  (:require [clj-commons.pretty.repl :as repl]))
+
+(defn install-pretty-exceptions
+  []
+  (repl/install-pretty-exceptions))
+
+(defn uncaught-exception-handler
+  []
+  (repl/uncaught-exception-handler))