[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/eglot 6689a15 026/139: Add eglot-clear-status interacti
From: |
João Távora |
Subject: |
[elpa] externals/eglot 6689a15 026/139: Add eglot-clear-status interactive command |
Date: |
Mon, 14 May 2018 09:54:47 -0400 (EDT) |
branch: externals/eglot
commit 6689a1588366a5d461207b11130b167e14a1dcf4
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>
Add eglot-clear-status interactive command
* eglot.el (eglot-clear-status): New
(eglot-forget-pending-continuations): Fix bug.
(eglot--mode-line-format): Add link to eglot-clear-status.
---
eglot.el | 12 ++++++++++--
1 file changed, 10 insertions(+), 2 deletions(-)
diff --git a/eglot.el b/eglot.el
index 1a82cc5..db594f4 100644
--- a/eglot.el
+++ b/eglot.el
@@ -361,9 +361,14 @@ identifier. ERROR is non-nil if this is an error."
(defun eglot-forget-pending-continuations (process)
"Stop waiting for responses from the current LSP PROCESS."
- (interactive (eglot--current-process-or-lose))
+ (interactive (list (eglot--current-process-or-lose)))
(clrhash (eglot--pending-continuations process)))
+(defun eglot-clear-status (process)
+ "Clear most recent error message from PROCESS."
+ (interactive (list (eglot--current-process-or-lose)))
+ (setf (eglot--status process) nil))
+
(cl-defun eglot--request (process
method
params
@@ -668,12 +673,15 @@ running. INTERACTIVE is t if called interactively."
`("/"
(:propertize
,status
- help-echo ,(concat "mouse-1: go to events buffer")
+ help-echo ,(concat "mouse-1: go to events buffer\n"
+ "mouse-3: clear this status")
mouse-face mode-line-highlight
face compilation-mode-line-fail
keymap ,(let ((map (make-sparse-keymap)))
(define-key map [mode-line mouse-1]
'eglot-events-buffer)
+ (define-key map [mode-line mouse-3]
+ 'eglot-clear-status)
map))))
,@(when (and doing (not done-p))
`("/"
- [elpa] externals/eglot c948713 035/139: Auto-reconnect on unexpected connection loss, (continued)
- [elpa] externals/eglot c948713 035/139: Auto-reconnect on unexpected connection loss, João Távora, 2018/05/14
- [elpa] externals/eglot 1dc2a9f 021/139: Implement spinners and RLS's window/progress, João Távora, 2018/05/14
- [elpa] externals/eglot 931093e 032/139: Don't clutter UI with warnings, João Távora, 2018/05/14
- [elpa] externals/eglot 95983c9 028/139: Change status to error everytime an error is found, João Távora, 2018/05/14
- [elpa] externals/eglot be52e1e 037/139: Rework connection restarting again, João Távora, 2018/05/14
- [elpa] externals/eglot d2eca65 045/139: Fix another Flymake sync bug, João Távora, 2018/05/14
- [elpa] externals/eglot f7f77e1 044/139: Make M-x eglot the main entry point, João Távora, 2018/05/14
- [elpa] externals/eglot d90efdf 001/139: Initial commit, João Távora, 2018/05/14
- [elpa] externals/eglot 1514e0f 052/139: Fix a couple of Rust-related edge cases, João Távora, 2018/05/14
- [elpa] externals/eglot b4dd4f8 022/139: Report server status in the mode-line, João Távora, 2018/05/14
- [elpa] externals/eglot 6689a15 026/139: Add eglot-clear-status interactive command,
João Távora <=
- [elpa] externals/eglot a3545fb 050/139: Rename RPC methods for clarity, João Távora, 2018/05/14
- [elpa] externals/eglot 9665a3e 051/139: Fix textDocument/didChange, João Távora, 2018/05/14
- [elpa] externals/eglot eebd32b 059/139: When user declines to reconnect, first quit existing server, João Távora, 2018/05/14
- [elpa] externals/eglot 17e0ca4 047/139: Fix Flymake diagnostic positions, João Távora, 2018/05/14
- [elpa] externals/eglot 9d404c9 054/139: Update README.md, João Távora, 2018/05/14
- [elpa] externals/eglot 29d4103 056/139: Fix mode-line mouse-clicks from outside selected window, João Távora, 2018/05/14
- [elpa] externals/eglot b1554fc 055/139: * eglot.el (eglot--process-receive): Skip null method notifs., João Távora, 2018/05/14
- [elpa] externals/eglot 51ff863 046/139: Must re-announce didOpen after reconnect, João Távora, 2018/05/14
- [elpa] externals/eglot c95a0a4 041/139: Multiple servers per project are possible, João Távora, 2018/05/14
- [elpa] externals/eglot f8bfb7e 064/139: Handle requests from server correctly, João Távora, 2018/05/14