From fdc6842a44e76db35432305455a05f2125962a62 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 1 Feb 2025 11:33:34 +0200 Subject: [PATCH] Remove bookmark fringe marks when deleting all bookmarks * lisp/bookmark.el (bookmark-delete-all): Remove fringe marks for all the bookmarks. (Bug#75953) --- lisp/bookmark.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/bookmark.el b/lisp/bookmark.el index cd59293e0a4..153646c1fff 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -1584,6 +1584,8 @@ confirmation." (when (or no-confirm (yes-or-no-p "Permanently delete all bookmarks? ")) (bookmark-maybe-load-default-file) + (dolist (bm bookmark-alist) + (bookmark--remove-fringe-mark bm)) (setq bookmark-alist-modification-count (+ bookmark-alist-modification-count (length bookmark-alist))) (setq bookmark-alist nil)