From: João Távora <joaotavora@gmail.com>
Date: Wed, 2 May 2018 12:54:37 +0000 (+0100)
Subject: Less obstrusive flymake stuff for now
X-Git-Tag: emacs-29.0.90~1616^2~524^2~4^2~677
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4602fc02aefa84339b4be3a7fe23d44a4a4af00c;p=emacs.git

Less obstrusive flymake stuff for now

* eglot.el (eglot--after-change, eglot-flymake-backend): Fix.
---

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 9742f885d9c..fe63a29bc4c 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -775,7 +775,8 @@ running.  INTERACTIVE is t if called interactively."
 (defun eglot--after-change (start end length)
   (cl-incf eglot--versioned-identifier)
   (push (list start end length) eglot--recent-changes)
-  (eglot--message "start is %s, end is %s, length is %s" start end length))
+  ;; (eglot--message "start is %s, end is %s, length is %s" start end length)
+  )
 
 (defun eglot--signalDidOpen ()
   (eglot--notify (eglot--current-process-or-lose)
@@ -816,6 +817,9 @@ running.  INTERACTIVE is t if called interactively."
     (setq eglot--recent-changes nil)))
 
 (defun eglot-flymake-backend (report-fn &rest _more)
+  "An EGLOT Flymake backend.
+Calls REPORT-FN maybe if server publishes diagnostics in time."
+  ;; FIXME: perhaps should call it immediately?
   (setq eglot--current-flymake-report-fn report-fn)
   (eglot--maybe-signal-didChange))