summaryrefslogtreecommitdiff
path: root/lisp/bookmark.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2021-10-16 10:10:06 +0300
committerEli Zaretskii <eliz@gnu.org>2021-10-16 10:10:06 +0300
commite842d7f29ac6a42e44065a94623b36b2dcbb81eb (patch)
tree40b19195b7ced4a2315bb190544e61c906b46a9c /lisp/bookmark.el
parentb5a0eda978738467eed16b9a530d175c33418362 (diff)
downloademacs-e842d7f29ac6a42e44065a94623b36b2dcbb81eb.tar.gz
Fix removal of fringe indication of bookmarks
* lisp/bookmark.el (bookmark--remove-fringe-mark): Fix off-by-one error in looking for bookmark-related overlays. (Bug#51233)
Diffstat (limited to 'lisp/bookmark.el')
-rw-r--r--lisp/bookmark.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/bookmark.el b/lisp/bookmark.el
index d64966df5af..fb90f01456e 100644
--- a/lisp/bookmark.el
+++ b/lisp/bookmark.el
@@ -479,7 +479,7 @@ See user option `bookmark-set-fringe'."
(dolist (buf (buffer-list))
(with-current-buffer buf
(when (equal filename buffer-file-name)
- (setq overlays (overlays-in pos pos))
+ (setq overlays (overlays-in pos (1+ pos)))
(while (and (not found) (setq temp (pop overlays)))
(when (eq 'bookmark (overlay-get temp 'category))
(delete-overlay (setq found temp))))))))))