[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/cider 0e76b14105 5/5: Expand `cider--sesman-friendly-sessi
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/cider 0e76b14105 5/5: Expand `cider--sesman-friendly-session-p`'s docstring' |
Date: |
Tue, 22 Aug 2023 09:59:05 -0400 (EDT) |
branch: elpa/cider
commit 0e76b141054f091fa1a21fea7f2a5604b2f7f8d4
Author: vemv <vemv@users.noreply.github.com>
Commit: Bozhidar Batsov <bozhidar@batsov.dev>
Expand `cider--sesman-friendly-session-p`'s docstring'
---
cider-repl.el | 10 +++++++++-
1 file changed, 9 insertions(+), 1 deletion(-)
diff --git a/cider-repl.el b/cider-repl.el
index 9166c87c3d..a6f1ef297d 100644
--- a/cider-repl.el
+++ b/cider-repl.el
@@ -1748,7 +1748,15 @@ constructs."
(defun cider--sesman-friendly-session-p (session &optional debug)
- "Check if SESSION is a friendly session, DEBUG optionally."
+ "Check if SESSION is a friendly session, DEBUG optionally.
+
+The checking is done as follows:
+
+* Consider the buffer's filename, strip any Docker/TRAMP details from it
+* Check if that filename belongs to the classpath,
+ or to the classpath roots (e.g. the project root dir)
+* As a fallback, check if the buffer's ns form
+ matches any of the loaded namespaces."
(setcdr session (seq-filter #'buffer-live-p (cdr session)))
(when-let* ((repl (cadr session))
(proc (get-buffer-process repl))