Fix print-handler construction.

greglook · Dec 17, 2018 · 7e765b3 · 7e765b3
1 parent 61f7a01
commit 7e765b3
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/src/whidbey/repl.clj b/src/whidbey/repl.clj
@@ -47,9 +47,8 @@
 (defn- print-options
   "Construct a map of print options to pass to Puget."
   [opts]
-  (-> options
-      (puget/merge-options opts)
-      (assoc :print-handlers (print-handlers opts))))
+  (let [opts (puget/merge-options options opts)]
+    (assoc opts :print-handlers (print-handlers opts))))
 
 
 (defn render-str