Add test name to clojure.test/deftest anon fn

flow-storm · Jan 23, 2024 · a2a8b7f · a2a8b7f
1 parent 6563e3c
commit a2a8b7f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/clj/clojure/test.clj b/src/clj/clojure/test.clj
@@ -633,7 +633,7 @@
   {:added "1.1"}
   [name & body]
   (when *load-tests*
-    `(def ~(vary-meta name assoc :test `(fn [] ~@body))
+    `(def ~(vary-meta name assoc :test `(fn ~name [] ~@body))
           (fn [] (test-var (var ~name))))))
 
 (defmacro deftest-