From 3650efa65ee1e34c36464c425e8cbb06cb317a8b Mon Sep 17 00:00:00 2001 From: Josh Elsasser Date: Mon, 21 May 2018 17:03:55 -0700 Subject: [PATCH] Introduce eglot--debug for unimportant messages * eglot.el (eglot--debug): New function to log noisy or trivial messages to the eglot events buffer. --- lisp/progmodes/eglot.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index 189ad1e5aae..92f16c0d04f 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -774,6 +774,10 @@ DEFERRED is passed to `eglot--async-request', which see." (let ((warning-minimum-level :error)) (display-warning 'eglot (apply #'format format args) :warning))) +(defun eglot--debug (server format &rest args) + "Warning message with FORMAT and ARGS." + (eglot--log-event server `(:message ,(format format args)))) + (defun eglot--pos-to-lsp-position (&optional pos) "Convert point POS to LSP position." (save-excursion -- 2.39.2