[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eglot 18c266f 1/5: Fix a ridiculous bug when generating
From: |
João Távora |
Subject: |
[elpa] externals/eglot 18c266f 1/5: Fix a ridiculous bug when generating transient projects |
Date: |
Tue, 15 May 2018 06:00:45 -0400 (EDT) |
branch: externals/eglot
commit 18c266f78ce4caf8fc6f5ad9399c4ac650d8b712
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 85b2d89..eb04c72 100644
--- a/eglot.el
+++ b/eglot.el
@@ -79,7 +79,7 @@ lasted more than that many seconds."
(defun eglot--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)))
@@ -300,7 +300,7 @@ INTERACTIVE is t if inside interactive call."
"\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