diff options
author | Bozhidar Batsov <bozhidar@batsov.com> | 2015-07-26 17:48:11 +0300 |
---|---|---|
committer | Bozhidar Batsov <bozhidar@batsov.com> | 2015-07-26 17:48:11 +0300 |
commit | b9e485d979482f864c1896a0aef7c5d7d083e806 (patch) | |
tree | 7f9f992b390dfc73ed11f8fbf0c4048b012c30f3 /test | |
parent | 03657705562a9882c95e9ab9020fb0743fd4656d (diff) |
[Fix #1220] Treat keywords as symbols in lookup commands
Basically, if the thing at point is `:clojure.core/str` we'll
treat it as `clojure.core/str` in commands like `cider-find-var'.
Diffstat (limited to 'test')
-rw-r--r-- | test/cider-tests.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/test/cider-tests.el b/test/cider-tests.el index 6683ba25..1afdc4a1 100644 --- a/test/cider-tests.el +++ b/test/cider-tests.el @@ -596,3 +596,9 @@ (should (cider-namespace-qualified-p "a.a-a/a-a")) (should (not (cider-namespace-qualified-p "/"))) (should (not (cider-namespace-qualified-p "/a")))) + +(ert-deftest cider--kw-to-symbol () + (should (equal (cider--kw-to-symbol "symbol") "symbol")) + (should (equal (cider--kw-to-symbol ":clj.core/str") "clj.core/str")) + (should (equal (cider--kw-to-symbol "::keyword") "keyword")) + (should (equal (cider--kw-to-symbol nil) nil))) |