procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/vcursor.el (vcursor-get-char-count): Preserve point

Browse source 
Copyright-paperwork-exempt: yes
This commit is contained in:
Narendra Joshi 2021-11-24 11:58:03 -05:00 • committed by Stefan Monnier
parent 9d3d972f97
commit 20ab639d89
1 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/vcursor.el
View file

@ -788,9 +788,9 @@ out how much to copy."
(vcursor-check)
(with-current-buffer (overlay-buffer vcursor-overlay)
(let ((start (goto-char (overlay-start vcursor-overlay))))
(- (progn (apply func args) (point)) start)))
)
(save-excursion
(let ((start (goto-char (overlay-start vcursor-overlay))))
(- (progn (apply func args) (point)) start)))))
;; Make sure the virtual cursor is active. Unless arg is non-nil,
;; report an error if it is not.