summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStuart Halloway <stu@thinkrelevance.com>2010-10-14 13:12:19 -0400
committerStuart Halloway <stu@thinkrelevance.com>2010-10-15 07:25:19 -0400
commit2e213cded166aa1b7b0bf298db571e05e31a49bc (patch)
treea10d436799ed39de0171203090f4a5ee228d9911
parent4b9d7ba4812a9540afcaf256dc2f58da1e173988 (diff)
test for #263
Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>
-rw-r--r--test/clojure/test_clojure/ns_libs.clj8
1 files changed, 8 insertions, 0 deletions
diff --git a/test/clojure/test_clojure/ns_libs.clj b/test/clojure/test_clojure/ns_libs.clj
index 75d8ce1e..37afacb3 100644
--- a/test/clojure/test_clojure/ns_libs.clj
+++ b/test/clojure/test_clojure/ns_libs.clj
@@ -73,6 +73,14 @@
#"Integer already refers to: class java.lang.Integer"
(defrecord Integer [])))))
+(deftest resolution
+ (let [s (gensym)]
+ (are [result expr] (= result expr)
+ #'clojure.core/first (ns-resolve 'clojure.core 'first)
+ nil (ns-resolve 'clojure.core s)
+ nil (ns-resolve 'clojure.core {'first :local-first} 'first)
+ nil (ns-resolve 'clojure.core {'first :local-first} s))))
+
(deftest refer-error-messages
(let [temp-ns (gensym)]
(binding [*ns* *ns*]