branch: externals/eglot
commit 0e5db67d44eb6861ce4428c5c81648678c39e245
Author: Brian Leung <[email protected]>
Commit: Stefan Kangas <[email protected]>
Per #786: Properly print error message of eglot-alternatives
* eglot.el (eglot-alternatives): Work with the listified form. This
allows presumed executables provided as (EXECUTABLE &rest ARGS...)
to be displayed in the error.
---
eglot.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/eglot.el b/eglot.el
index ef9b371af8..922b9225d2 100644
--- a/eglot.el
+++ b/eglot.el
@@ -114,7 +114,7 @@ chosen (interactively or automatically)."
collect (if (listp a) a (list a))))
(err (lambda ()
(error "None of '%s' are valid executables"
- (mapconcat #'identity alternatives ", ")))))
+ (mapconcat #'car listified ", ")))))
(cond (interactive
(let* ((augmented (mapcar (lambda (a)
(let ((found (eglot--executable-find
