diff options
author | Bozhidar Batsov <bozhidar@batsov.com> | 2015-12-19 21:28:27 +0200 |
---|---|---|
committer | Bozhidar Batsov <bozhidar@batsov.com> | 2015-12-19 21:28:27 +0200 |
commit | 6aefaba82eadf8a6615cd9067e24a156809fdaf6 (patch) | |
tree | b14e36c124d11d5a2a143808d6f44af1f01c9419 /test | |
parent | b01848ec21baa075f7d0a778a81565fec7ffd382 (diff) |
Introduce the concept of project name
Using project directories everywhere produces some pretty ugly (and
long) output. In most cases the final segment of the directory name is
the actual project name - much shorter and more to the point.
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 7b0774b5..11755e54 100644 --- a/test/cider-tests.el +++ b/test/cider-tests.el @@ -558,3 +558,9 @@ (should (equal (cider--deep-vector-to-list 'bug) 'bug)) (should (equal (cider--deep-vector-to-list '[bug]) '(bug))) (should (equal (cider--deep-vector-to-list '(bug)) '(bug)))) + +(ert-deftest cider-project-name () + (should (equal (cider-project-name nil) "-")) + (should (equal (cider-project-name "") "-")) + (should (equal (cider-project-name "path/to/project") "project")) + (should (equal (cider-project-name "path/to/project/") "project"))) |