summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorVitalie Spinu <spinuvit@gmail.com>2014-08-13 13:50:25 -0700
committerVitalie Spinu <spinuvit@gmail.com>2014-08-25 12:02:51 -0700
commit09dcec951125300274eea6e0b5f591be1d57bb5e (patch)
tree41f678af60d204b3172b88a430eae05416c57397 /test
parentb58ba0ac546fc6a4c9228cb18f552067741a060d (diff)
Use repl buffer as connection buffer
Ancillary changes: - new functions `nrepl-start-client-process' and `nrepl-start-server-process'. - `cider-init-repl-buffer' and `cider-create-repl-buffer' have clear cut separation of functionality - `nrepl-make-buffer-name` and all `cider-create-xxx-buffer-name` take explicit dir, port and host variables. - increase `nrepl-decode-timeout` to 0.025 for greater reliability - merge `nrepl--handle-process-output` into client process filter - remove `nrepl-connect' in favor of `nrepl-start-client-process'
Diffstat (limited to 'test')
-rw-r--r--test/cider-tests.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/test/cider-tests.el b/test/cider-tests.el
index d85272b2..b7fc131f 100644
--- a/test/cider-tests.el
+++ b/test/cider-tests.el
@@ -96,19 +96,19 @@
,@body
(mapc 'kill-buffer (list ,@buffer-names))))))
-(ert-deftest test-nrepl-make-repl-connection-default ()
+(ert-deftest test-nrepl-make-connection-default ()
(let ((connections (nrepl-connection-buffers)))
(cider-test-with-buffers
(a b)
(should (get-buffer a))
(should (get-buffer b))
;; Add one connection
- (nrepl-make-repl-connection-default a)
+ (nrepl-make-connection-default a)
(should (equal (append (list (buffer-name a)) connections)
(nrepl-connection-buffers)))
(should (equal (buffer-name a) (nrepl-current-connection-buffer)))
;; Add second connection
- (nrepl-make-repl-connection-default b)
+ (nrepl-make-connection-default b)
(should (equal (append (list (buffer-name b) (buffer-name a)) connections)
(nrepl-connection-buffers)))
(should (equal (buffer-name b) (nrepl-current-connection-buffer))))))
@@ -117,8 +117,8 @@
(let ((connections (nrepl-connection-buffers)))
(cider-test-with-buffers
(a b)
- (nrepl-make-repl-connection-default a)
- (nrepl-make-repl-connection-default b)
+ (nrepl-make-connection-default a)
+ (nrepl-make-connection-default b)
;; killing a buffer should see it purged from the connection list
(kill-buffer a)
(should (equal (append (list (buffer-name b)) connections)
@@ -168,8 +168,8 @@
(let ((connections (nrepl-connection-buffers)))
(cider-test-with-buffers
(a b)
- (nrepl-make-repl-connection-default a)
- (nrepl-make-repl-connection-default b)
+ (nrepl-make-connection-default a)
+ (nrepl-make-connection-default b)
;; closing a buffer should see it removed from the connection list
(nrepl-close a)
(should (not (buffer-live-p a)))