From 643a6e6987c197c561f7603e78692eddb4744994 Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Fri, 21 Jun 2024 10:59:09 +0200 Subject: [PATCH] Fix regression with bookmark annotations --- lisp/bookmark.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 05757309bc1..50767fce671 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -996,7 +996,10 @@ still there, in order, if the topmost one is ever deleted." (bookmark-store name record t)) (t (error "Unrecognized value for `overwrite-or-push': %S" - overwrite-or-push)))))) + overwrite-or-push))) + (when bookmark-fringe-mark (bookmark--set-fringe-mark)))) + ;; Ask for an annotation buffer for this bookmark + (when bookmark-use-annotations (bookmark-edit-annotation name))) (defun bookmark-default-name () (let ((record (bookmark-make-record))) -- 2.39.2