summaryrefslogtreecommitdiff
path: root/cider-connection.el
diff options
context:
space:
mode:
authorVitalie Spinu <spinuvit@gmail.com>2018-06-18 13:27:12 +0200
committerBozhidar Batsov <bozhidar.batsov@gmail.com>2018-06-18 18:35:41 +0300
commit3a792fe57cc35ae5dc58b243c1c57787d3f0456e (patch)
tree909350d4753a3f8085a31c1f448ef2ca85ef373b /cider-connection.el
parentb2147d57f2987bab3468bfddaf4dbb944fdd8f4c (diff)
Check in `cider-connected-p` that the process is alive
Diffstat (limited to 'cider-connection.el')
-rw-r--r--cider-connection.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/cider-connection.el b/cider-connection.el
index ca10d8b5..5b2c1516 100644
--- a/cider-connection.el
+++ b/cider-connection.el
@@ -70,7 +70,7 @@ PARAMS is a plist containing :host, :port, :server and other parameters for
(defun cider-connected-p ()
"Return t if CIDER is currently connected, nil otherwise."
- (sesman-has-links-p 'CIDER))
+ (process-live-p (get-buffer-process (cider-current-repl))))
(defun cider-ensure-connected ()
"Ensure there is a linked CIDER session."