diff options
author | João Távora <joaotavora@gmail.com> | 2023-03-19 19:44:31 +0000 |
---|---|---|
committer | João Távora <joaotavora@gmail.com> | 2023-03-19 19:53:48 +0000 |
commit | a4d97811ed4a6557ccac4b6a79a52993d8aa0fa3 (patch) | |
tree | fec712620022b93e343453186a163ff14c2de5c7 | |
parent | 61d571760b3342c25a767c92da88ca7940156374 (diff) | |
download | emacs-a4d97811ed4a6557ccac4b6a79a52993d8aa0fa3.tar.gz |
Bail early from eglot--apply-text-edits if nothing to do
* lisp/progmodes/eglot.el (eglot--apply-text-edits): Early return.
-rw-r--r-- | lisp/progmodes/eglot.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el index dbd3eff67d1..7a076c134fc 100644 --- a/lisp/progmodes/eglot.el +++ b/lisp/progmodes/eglot.el @@ -3219,8 +3219,9 @@ Returns a list as described in docstring of `imenu--index-alist'." ,(eglot--TextDocumentIdentifier)) :cancel-on-input non-essential)))))) -(defun eglot--apply-text-edits (edits &optional version) +(cl-defun eglot--apply-text-edits (edits &optional version) "Apply EDITS for current buffer if at VERSION, or if it's nil." + (unless edits (cl-return-from eglot--apply-text-edits)) (unless (or (not version) (equal version eglot--versioned-identifier)) (jsonrpc-error "Edits on `%s' require version %d, you have %d" (current-buffer) version eglot--versioned-identifier)) |