branch: externals/eglot
commit ea918abb952c3e624e57681a9b313df32ddcd014
Author: João Távora <joaotav...@gmail.com>
Commit: João Távora <joaotav...@gmail.com>

    Include source info in diagnostics
    
    * eglot.el (eglot--server-textDocument/publishDiagnostics):
    Include source info.
---
 eglot.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/eglot.el b/eglot.el
index d073be2..10435a1 100644
--- a/eglot.el
+++ b/eglot.el
@@ -936,7 +936,7 @@ running.  INTERACTIVE is t if called interactively."
                      (point))))
           (cl-loop for diag-spec across diagnostics
                    collect (cl-destructuring-bind (&key range severity _group
-                                                        _code _source message)
+                                                        _code source message)
                                diag-spec
                              (cl-destructuring-bind (&key start end)
                                  range
@@ -951,7 +951,7 @@ running.  INTERACTIVE is t if called interactively."
                                          :warning)
                                         (t
                                          :note))
-                                  message))))
+                                  (concat source ": " message)))))
                    into diags
                    finally
                    (if eglot--current-flymake-report-fn

Reply via email to