Eglot: check server capability before sending didSave (bug#61478)
* lisp/progmodes/eglot.el (eglot--signal-textDocument/didSave): check server capability. Copyright-paperwork-exempt: Yes
This commit is contained in:
parent
a3a1ef7bd5
commit
7678b7e46f
1 changed files with 8 additions and 7 deletions
|
@ -2496,13 +2496,14 @@ When called interactively, use the currently active server"
|
|||
(defun eglot--signal-textDocument/didSave ()
|
||||
"Send textDocument/didSave to server."
|
||||
(eglot--signal-textDocument/didChange)
|
||||
(jsonrpc-notify
|
||||
(eglot--current-server-or-lose)
|
||||
:textDocument/didSave
|
||||
(list
|
||||
;; TODO: Handle TextDocumentSaveRegistrationOptions to control this.
|
||||
:text (buffer-substring-no-properties (point-min) (point-max))
|
||||
:textDocument (eglot--TextDocumentIdentifier))))
|
||||
(when (eglot--server-capable :textDocumentSync :save)
|
||||
(jsonrpc-notify
|
||||
(eglot--current-server-or-lose)
|
||||
:textDocument/didSave
|
||||
(list
|
||||
;; TODO: Handle TextDocumentSaveRegistrationOptions to control this.
|
||||
:text (buffer-substring-no-properties (point-min) (point-max))
|
||||
:textDocument (eglot--TextDocumentIdentifier)))))
|
||||
|
||||
(defun eglot-flymake-backend (report-fn &rest _more)
|
||||
"A Flymake backend for Eglot.
|
||||
|
|
Loading…
Add table
Reference in a new issue