summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2022-03-09 17:37:36 +0100
committerLars Ingebrigtsen <larsi@gnus.org>2022-03-09 17:37:47 +0100
commit2353893bd04bfee7c7659a758cf7c5072121a90c (patch)
treebad08a0fd9f17e040c02188575c8277813fb9552 /lisp/emacs-lisp
parent94f342438144c99bec90cc219283df2033866576 (diff)
downloademacs-2353893bd04bfee7c7659a758cf7c5072121a90c.tar.gz
emacs-2353893bd04bfee7c7659a758cf7c5072121a90c.tar.bz2
emacs-2353893bd04bfee7c7659a758cf7c5072121a90c.zip
Fix regression in vtable-goto-object
* lisp/emacs-lisp/vtable.el (vtable-goto-object): Fix moving to the object.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/vtable.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/vtable.el b/lisp/emacs-lisp/vtable.el
index 2c61996637f..d8577c19762 100644
--- a/lisp/emacs-lisp/vtable.el
+++ b/lisp/emacs-lisp/vtable.el
@@ -167,7 +167,7 @@ Return the position of the object if found, and nil if not."
(let ((start (point)))
(vtable-beginning-of-table)
(save-restriction
- (narrow-to-region (point) (vtable-end-of-table))
+ (narrow-to-region (point) (save-excursion (vtable-end-of-table)))
(if (text-property-search-forward 'vtable-object object #'eq)
(progn
(forward-line -1)