aboutsummaryrefslogtreecommitdiff
path: root/src/test/clojure/clojure/contrib/test_repl_utils.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/test/clojure/clojure/contrib/test_repl_utils.clj')
-rw-r--r--src/test/clojure/clojure/contrib/test_repl_utils.clj20
1 files changed, 0 insertions, 20 deletions
diff --git a/src/test/clojure/clojure/contrib/test_repl_utils.clj b/src/test/clojure/clojure/contrib/test_repl_utils.clj
deleted file mode 100644
index 6fa12ed7..00000000
--- a/src/test/clojure/clojure/contrib/test_repl_utils.clj
+++ /dev/null
@@ -1,20 +0,0 @@
-(ns clojure.contrib.test-repl-utils
- (:use clojure.test
- clojure.contrib.repl-utils))
-
-(deftest test-apropos
- (testing "with a regular expression"
- (is (= '[defmacro] (apropos #"^defmacro$")))
- (is (some '#{defmacro} (apropos #"def.acr.")))
- (is (= [] (apropos #"nothing-has-this-name"))))
-
-
- (testing "with a string"
- (is (some '#{defmacro} (apropos "defmacro")))
- (is (some '#{defmacro} (apropos "efmac")))
- (is (= [] (apropos "nothing-has-this-name"))))
-
- (testing "with a symbol"
- (is (some '#{defmacro} (apropos 'defmacro)))
- (is (some '#{defmacro} (apropos 'efmac)))
- (is (= [] (apropos 'nothing-has-this-name)))))