mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-10 15:56:18 +00:00
Code Issues Releases Activity

Fix removal of fringe indication of bookmarks

Browse Source 
* lisp/bookmark.el (bookmark--remove-fringe-mark): Fix off-by-one
error in looking for bookmark-related overlays.  (Bug#51233)
This commit is contained in:
Eli Zaretskii 2021-10-16 10:10:06 +03:00
parent b5a0eda978
commit e842d7f29a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/bookmark.el
View File

@ -479,7 +479,7 @@ See user option `bookmark-set-fringe'."
(dolist (buf (buffer-list)) (dolist (buf (buffer-list))
(with-current-buffer buf (with-current-buffer buf
(when (equal filename buffer-file-name) (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))) (while (and (not found) (setq temp (pop overlays)))
(when (eq 'bookmark (overlay-get temp 'category)) (when (eq 'bookmark (overlay-get temp 'category))
(delete-overlay (setq found temp)))))))))) (delete-overlay (setq found temp))))))))))