always return current transport from (send ...)

clojure · Dec 11, 2012 · 81580ae · 81580ae
1 parent 0398125
commit 81580ae
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/main/clojure/clojure/tools/nrepl/middleware/pr_values.clj b/src/main/clojure/clojure/tools/nrepl/middleware/pr_values.clj
@@ -21,7 +21,8 @@
                                  (.send transport
                                    (if-let [[_ v] (find resp :value)]
                                      (assoc resp :value (with-out-str (pr v)))
-                                     resp))))))))
+                                     resp))
+                                 this))))))
 
 (set-descriptor! #'pr-values
   {:requires #{}