summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/nrepl-tests.el8
1 files changed, 8 insertions, 0 deletions
diff --git a/test/nrepl-tests.el b/test/nrepl-tests.el
index e84077d5..cf4fb642 100644
--- a/test/nrepl-tests.el
+++ b/test/nrepl-tests.el
@@ -470,6 +470,14 @@
(should
(equal (nrepl-repl-buffer-name) "*nrepl*"))))))
+(ert-deftest test-nrepl-clojure-buffer-name-w/project ()
+ (with-temp-buffer
+ (lexical-let ((b1 (current-buffer)))
+ (let ((nrepl-connection-list (list (buffer-name b1)))
+ (nrepl-project-dir "/a/test/directory/project"))
+ (should
+ (equal (nrepl-repl-buffer-name) "*nrepl project*"))))))
+
(ert-deftest test-nrepl--find-rest-args-position ()
(should (= (nrepl--find-rest-args-position [fmt & arg]) 1))
(should (equal (nrepl--find-rest-args-position [fmt arg]) nil)))