]> git.eshelyaron.com Git - emacs.git/commitdiff
Properly print error message of eglot-alternatives
authorBrian Leung <bkleung89@gmail.com>
Sun, 9 Jan 2022 02:08:23 +0000 (18:08 -0800)
committerStefan Kangas <stefankangas@gmail.com>
Sun, 9 Jan 2022 23:27:23 +0000 (00:27 +0100)
* eglot.el (eglot-alternatives): Work with the listified form. This
allows presumed executables provided as (EXECUTABLE &rest ARGS...)
to be displayed in the error.

GitHub-reference: per https://github.com/joaotavora/eglot/issues/786

lisp/progmodes/eglot.el

index ef9b371af893db1d4472d00b1fad3a68b2c16e16..922b9225d27157adff7007330118d116e1e5176f 100644 (file)
@@ -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