diff --git a/README.md b/README.md
index 1d47447..24fef5b 100644
--- a/README.md
+++ b/README.md
@@ -57,7 +57,7 @@ basis. Just add the following to `~/.lein/profiles.clj`:
                                             'print-cause-trace)
                            new (ns-resolve (doto 'clj-stacktrace.repl require)
                                            'pst)]
-                       (alter-var-root orig (constantly @new)))]}}
+                       (alter-var-root orig (constantly (deref new))))]}}
 ```
 
 The `:injections` clause replaces the built-in stack trace printing
diff --git a/debian/changelog b/debian/changelog
index 56b0dbf..8e9e989 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,9 +1,12 @@
-clj-stacktrace-clojure (0.2.7-2) UNRELEASED; urgency=normal
+clj-stacktrace-clojure (0.2.8-1) UNRELEASED; urgency=normal
 
   [ Louis-Philippe Véronneau ]
   * d/control: New email for the Clojure Team.
 
- -- Louis-Philippe Véronneau <pollo@debian.org>  Sat, 08 Jan 2022 18:32:53 -0500
+  [ Debian Janitor ]
+  * New upstream release.
+
+ -- Louis-Philippe Véronneau <pollo@debian.org>  Mon, 14 Mar 2022 16:41:32 -0000
 
 clj-stacktrace-clojure (0.2.7-1) unstable; urgency=medium
 
diff --git a/project.clj b/project.clj
index ab0480a..fbe28bd 100644
--- a/project.clj
+++ b/project.clj
@@ -1,4 +1,4 @@
-(defproject clj-stacktrace "0.2.7"
+(defproject clj-stacktrace "0.2.8"
   :description "More readable stacktraces in Clojure programs."
   :url "https://github.com/mmcgrana/clj-stacktrace"
   :license {:name "MIT" :url "http://opensource.org/licenses/MIT"}
diff --git a/src/clj_stacktrace/repl.clj b/src/clj_stacktrace/repl.clj
index 4c71bc8..8757521 100644
--- a/src/clj_stacktrace/repl.clj
+++ b/src/clj_stacktrace/repl.clj
@@ -109,9 +109,12 @@
       this-source-width)))
 
 (defn pst-on [on color? e]
-  "Prints to the given Writer on a pretty stack trace for the given exception e,
+  "Prints to the given Writer on a pretty stack trace for e which can be an exception
+  or already parsed exception (clj-stacktrace.core/parse-exception).
   ANSI colored if color? is true."
-  (let [exec         (parse-exception e)
+  (let [exec (if (instance? Throwable e)
+               (parse-exception e)
+               e)
         source-width (find-source-width exec)]
     (pst-class-on on color? (:class exec))
     (pst-message-on on color? (:message exec))
@@ -120,7 +123,7 @@
       (pst-cause-on on color? cause source-width))))
 
 (defn pst
-  "Print to *out* a pretty stack trace for an exception, by default *e."
+  "Print to *out* a pretty stack trace for a (parsed) exception, by default *e."
   [& [e]]
   (pst-on *out* false (or e *e)))