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

    Don't clutter UI with warnings
    
    * eglot.el (warnings): require it.
    (eglot--warn): set warning-minimum-level
---
 eglot.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/eglot.el b/eglot.el
index c7bb5d4..6e5954c 100644
--- a/eglot.el
+++ b/eglot.el
@@ -31,6 +31,7 @@
 (require 'url-util)
 (require 'pcase)
 (require 'compile) ; for some faces
+(require 'warnings)
 
 (defgroup eglot nil
   "Interaction with Language Server Protocol servers"
@@ -623,9 +624,10 @@ running.  INTERACTIVE is t if called interactively."
 
 (defun eglot--warn (format &rest args)
   "Warning message with FORMAT and ARGS."
-  (display-warning 'eglot
-                   (apply #'format format args)
-                   :warning))
+  (let ((warning-minimum-level :error))
+    (display-warning 'eglot
+                     (apply #'format format args)
+                     :warning)))
 
 
 

Reply via email to