[elpa] externals/eglot 5cda0ec 06/69: Fix a ridiculous bug when generating transient projects

[João Távora]

branch: externals/eglot
commit 5cda0ec5291e4daf7b89bf433bed13bd231e9aea
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>

    Fix a ridiculous bug when generating transient projects
    
    * eglot.el (eglot--find-current-process, eglot--interactive): Fix
    horrible bug.
---
 eglot.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/eglot.el b/eglot.el
index 13aeff6..11d048e 100644
--- a/eglot.el
+++ b/eglot.el
@@ -136,7 +136,7 @@ called interactively."
 
 (defun eglot--find-current-process ()
   "The current logical EGLOT process."
-  (let* ((probe (or (project-current) (cons 'transient default-directory))))
+  (let* ((probe (or (project-current) `(transient . ,default-directory))))
     (cl-find major-mode (gethash probe eglot--processes-by-project)
              :key #'eglot--major-mode)))
 
@@ -208,7 +208,7 @@ called interactively."
                          "\n" base-prompt)))))
     (list
      managed-mode
-     (or (project-current) `(transient . default-directory))
+     (or (project-current) `(transient . ,default-directory))
      (if prompt
          (split-string-and-unquote
           (read-shell-command prompt