diff options
| author | João Távora <joaotavora@gmail.com> | 2022-10-10 13:57:26 +0100 |
|---|---|---|
| committer | João Távora <joaotavora@gmail.com> | 2022-10-20 10:50:47 +0100 |
| commit | eb9d6281b58f50927afdc2fdb2fcebf76e2ffe23 (patch) | |
| tree | 91f044b65757c741bbfa5f82ecb39821340d7126 /lisp/progmodes | |
| parent | 4071eaf8ad9ce7e1a19f9f12c20430a77c1807c9 (diff) | |
| download | emacs-eb9d6281b58f50927afdc2fdb2fcebf76e2ffe23.tar.gz emacs-eb9d6281b58f50927afdc2fdb2fcebf76e2ffe23.tar.bz2 emacs-eb9d6281b58f50927afdc2fdb2fcebf76e2ffe23.zip | |
Do use eglot-connect-timeout if eglot-sync-connect is t
Reported by Eli Zaretskii <eliz@gnu.org>
* eglot.el (eglot--connect): Use eglot-connect-timeout in the case
eglot-sync-connect is t.
Diffstat (limited to 'lisp/progmodes')
| -rw-r--r-- | lisp/progmodes/eglot.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index d3f5935a9ef..18523067fa0 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -1282,7 +1282,8 @@ in project `%s'." (cond ((numberp eglot-sync-connect) (accept-process-output nil eglot-sync-connect)) (eglot-sync-connect - (while t (accept-process-output nil 30))))))) + (while t (accept-process-output + nil eglot-connect-timeout))))))) (pcase retval (`(error . ,msg) (eglot--error msg)) (`nil (eglot--message "Waiting in background for server `%s'" |