From 3e0fc97befc105caf8d7519f1e6fd84c67a50a35 Mon Sep 17 00:00:00 2001 From: Boruch Baum Date: Wed, 25 Mar 2015 21:43:51 -0400 Subject: [PATCH] * lisp/bookmark.el (bookmark-show-all-annotations): Sort them Fixes: debbugs:20177 --- lisp/ChangeLog | 4 ++++ lisp/bookmark.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 56c2b4c6f98..37ac1c5f3c8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2015-03-26 Boruch Baum (tiny change) + + * bookmark.el (bookmark-show-all-annotations): Sort them (bug#20177). + 2015-03-25 Dmitry Gutov * json.el (json-special-chars): Don't treat `/' specially, there's diff --git a/lisp/bookmark.el b/lisp/bookmark.el index a49ee7ec8b3..dc8057e6e0d 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el @@ -1756,7 +1756,7 @@ if an annotation exists." (save-selected-window (pop-to-buffer (get-buffer-create "*Bookmark Annotation*") t) (delete-region (point-min) (point-max)) - (dolist (full-record bookmark-alist) + (dolist (full-record (bookmark-maybe-sort-alist)) (let* ((name (bookmark-name-from-full-record full-record)) (ann (bookmark-get-annotation full-record))) (insert (concat name ":\n")) -- 2.11.4.GIT