diff options
author | Bozhidar Batsov <bozhidar@batsov.com> | 2016-03-25 08:21:29 +0200 |
---|---|---|
committer | Bozhidar Batsov <bozhidar@batsov.com> | 2016-03-25 08:21:29 +0200 |
commit | 78b277ddba3ba109054fa0b1941e2e40f235e3e4 (patch) | |
tree | e3db5c3dd124012b1e9d76bf8421f276e6584ccc /test | |
parent | c06bf42b4bb582ad02477e7903de307310f859f3 (diff) |
Pass cider-expected-ns's optional path arg to clojure-expected-ns
Diffstat (limited to 'test')
-rw-r--r-- | test/cider-tests.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/test/cider-tests.el b/test/cider-tests.el index 2d1a2cff..58b3266e 100644 --- a/test/cider-tests.el +++ b/test/cider-tests.el @@ -781,7 +781,7 @@ (noflet ((cider-ensure-op-supported (op) nil)) (should-error (cider-find-ns) :type 'user-error))) -(ert-deftest cider-expected-ns () +(ert-deftest cider-expected-ns-connected () (noflet ((cider-connected-p () t) (cider-sync-request:classpath () '("/a" "/b" "/c" "/c/inner" "/base/clj" "/base/clj-dev"))) @@ -798,3 +798,9 @@ "foo.bar.baz")) (should (string= (cider-expected-ns "/base/clj-dev/foo/bar.clj") "foo.bar")))) + +(ert-deftest cider-expected-ns-not-connected () + (noflet ((cider-connected-p () nil) + (clojure-expected-ns (path) "clojure-expected-ns")) + (should (string= (cider-expected-ns "foo") + "clojure-expected-ns")))) |