]> git.eshelyaron.com Git - emacs.git/commitdiff
Simplify bug-reporting instructions
authorJoão Távora <joaotavora@gmail.com>
Sun, 3 May 2020 20:59:29 +0000 (21:59 +0100)
committerJoão Távora <joaotavora@gmail.com>
Sun, 3 May 2020 20:59:29 +0000 (21:59 +0100)
We assume the user has a recent enough jsonrpc.el that consolidates
events and stderr int the same transcript.

* README.md (Reporting bugs): Simplify instructions.

* eglot.el (eglot-events-buffer): Can work with no server.

lisp/progmodes/eglot.el

index d172f4c7cc861df05e6f17b61d334cb5a3de0d79..03609a128c3e7566315b31d10bc3446455b08d7a 100644 (file)
@@ -808,9 +808,15 @@ INTERACTIVE is t if called interactively."
         (add-hook 'post-command-hook #'maybe-connect 'append nil)))))
 
 (defun eglot-events-buffer (server)
-  "Display events buffer for SERVER."
-  (interactive (list (eglot--current-server-or-lose)))
-  (display-buffer (jsonrpc-events-buffer server)))
+  "Display events buffer for SERVER.
+Use current server's or first available Eglot events buffer."
+  (interactive (list eglot--cached-server))
+  (let ((buffer (if server (jsonrpc-events-buffer server)
+                  (cl-find "\\*EGLOT.*events\\*"
+                           (buffer-list)
+                           :key #'buffer-name :test #'string-match))))
+    (if buffer (display-buffer buffer)
+      (eglot--error "Can't find an Eglot events buffer!"))))
 
 (defun eglot-stderr-buffer (server)
   "Display stderr buffer for SERVER."