branch: externals/elpa
commit 95983c9b526da4258c862d55f27099ec4f2350ee
Author: João Távora <[email protected]>
Commit: João Távora <[email protected]>
Change status to error everytime an error is found
* eglot.el (eglot--process-receive): Also set error status.
(eglot--request): Fix a compilation warning.
---
eglot.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/eglot.el b/eglot.el
index 1f2737e..457f316 100644
--- a/eglot.el
+++ b/eglot.el
@@ -317,6 +317,8 @@ identifier. ERROR is non-nil if this is an error."
message
response-id
err)
+ (when err
+ (setf (eglot--status proc) '("error" t)))
(cond ((and response-id
(not continuations))
(eglot--warn "Ooops no continuation for id %s" response-id))
@@ -384,7 +386,7 @@ identifier. ERROR is non-nil if this is an error."
(error-fn
(or error-fn
(cl-function
- (lambda (&key data code message &allow-other-keys)
+ (lambda (&key code message &allow-other-keys)
(setf (eglot--status process) '("error" t))
(eglot--warn
"(request) Request id=%s errored with code=%s: %s"
