tag: 1.2
commit f2a6aa3436af344dd7730c88f2430ebabf63db0c
Author: mkcms <[email protected]>
Commit: João Távora <[email protected]>
Close #54: Correctly make LSP positions in narrowed buffers
* eglot.el (eglot--pos-to-lsp-position): Fix return value when
narrowing is in effect.
---
eglot.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/eglot.el b/eglot.el
index 3c01657..fbc6a53 100644
--- a/eglot.el
+++ b/eglot.el
@@ -597,10 +597,10 @@ CONNECT-ARGS are passed as additional arguments to
(defun eglot--pos-to-lsp-position (&optional pos)
"Convert point POS to LSP position."
- (save-excursion
- (list :line (1- (line-number-at-pos pos t)) ; F!@&#$CKING OFF-BY-ONE
- :character (- (goto-char (or pos (point)))
- (line-beginning-position)))))
+ (eglot--widening
+ (list :line (1- (line-number-at-pos pos t)) ; F!@&#$CKING OFF-BY-ONE
+ :character (- (goto-char (or pos (point)))
+ (line-beginning-position)))))
(defun eglot--lsp-position-to-point (pos-plist &optional marker)
"Convert LSP position POS-PLIST to Emacs point.
