From 15e4aab321c5774321fce2c94637f5bf4b141f2c Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Mon, 23 Nov 2020 21:39:14 +0200 Subject: [PATCH] Add a docstring --- src/cider/nrepl/middleware/test.clj | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/cider/nrepl/middleware/test.clj b/src/cider/nrepl/middleware/test.clj index 76fe41ad..2facadea 100644 --- a/src/cider/nrepl/middleware/test.clj +++ b/src/cider/nrepl/middleware/test.clj @@ -63,7 +63,9 @@ (filter #(= (:class %) (.getName (class f)))) (first))) -(defn- print-object [object] +(defn- print-object + "Print `object` using pprint or a custom print-method, if available." + [object] (let [print-fn (if (= (get-method print-method (:type (meta object))) (get-method print-method :default)) pp/pprint