From 139b87c599240752706df1d27e26ad077f45778f Mon Sep 17 00:00:00 2001
From: Anthony Grimes <i@raynes.me>
Date: Fri, 15 Feb 2013 16:10:19 -0800
Subject: [PATCH] Make :only work with namespaces too.

---
 src/leiningen/test.clj | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/leiningen/test.clj b/src/leiningen/test.clj
index 7c22f66c..e05bb8c8 100644
--- a/src/leiningen/test.clj
+++ b/src/leiningen/test.clj
@@ -107,7 +107,11 @@
                   (symbol))))
        ns))
    '(fn [m & vars]
-      (some #(= (str "#'" %) (-> m ::var str)) vars))])
+      (some #(let [var (str "#'" %)]
+               (if (some #{\/} var)
+                 (= var (-> m ::var str))
+                 (= % (ns-name (:ns m)))))
+            vars))])
 
 (defn- convert-to-ns [possible-file]
   (if (and (.endsWith possible-file ".clj") (.exists (io/file possible-file)))