From: Josh Elsasser Date: Tue, 22 May 2018 00:03:55 +0000 (-0700) Subject: Introduce eglot--debug for unimportant messages X-Git-Tag: emacs-29.0.90~1616^2~524^2~4^2~537^2~2 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3650efa65ee1e34c36464c425e8cbb06cb317a8b;p=emacs.git Introduce eglot--debug for unimportant messages * eglot.el (eglot--debug): New function to log noisy or trivial messages to the eglot events buffer. --- 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