Permalink
Browse files

Return body value from with-prn.

  • Loading branch information...
1 parent 297f876 commit b76ef15248dac88c7b1c77c2d461f3aa522a1461 @Chouser Chouser committed May 17, 2015
Showing with 1 addition and 1 deletion.
  1. +1 −1 src/clj/joy/multimethods.clj
View
2 src/clj/joy/multimethods.clj
@@ -1,7 +1,7 @@
(ns joy.multimethods)
(defmacro with-prn [& body]
- `(try (prn (do ~@body)) (catch Throwable t# (prn t#))))
+ `(try (let [x# (do ~@body)] (prn x#) x#) (catch Throwable t# (prn t#))))
(defn beget [this proto]
(assoc this ::prototype proto))

0 comments on commit b76ef15

Please sign in to comment.