diff options
Diffstat (limited to 'src/test/clojure/clojure/contrib/test_repl_utils.clj')
| -rw-r--r-- | src/test/clojure/clojure/contrib/test_repl_utils.clj | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/test/clojure/clojure/contrib/test_repl_utils.clj b/src/test/clojure/clojure/contrib/test_repl_utils.clj index 77ae2aae..6fa12ed7 100644 --- a/src/test/clojure/clojure/contrib/test_repl_utils.clj +++ b/src/test/clojure/clojure/contrib/test_repl_utils.clj @@ -5,16 +5,16 @@ (deftest test-apropos (testing "with a regular expression" (is (= '[defmacro] (apropos #"^defmacro$"))) - (is (seq-contains? (apropos #"def.acr.") 'defmacro)) + (is (some '#{defmacro} (apropos #"def.acr."))) (is (= [] (apropos #"nothing-has-this-name")))) (testing "with a string" - (is (seq-contains? (apropos "defmacro") 'defmacro)) - (is (seq-contains? (apropos "efmac") 'defmacro)) + (is (some '#{defmacro} (apropos "defmacro"))) + (is (some '#{defmacro} (apropos "efmac"))) (is (= [] (apropos "nothing-has-this-name")))) (testing "with a symbol" - (is (seq-contains? (apropos 'defmacro) 'defmacro)) - (is (seq-contains? (apropos 'efmac) 'defmacro)) + (is (some '#{defmacro} (apropos 'defmacro))) + (is (some '#{defmacro} (apropos 'efmac))) (is (= [] (apropos 'nothing-has-this-name))))) |