Mercurial > emacs

changeset 84858:e745533cff59

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(bookmark-bmenu-list, bookmark-show-all-annotations): Use `mapc' rather than `mapcar'.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 25 Sep 2007 10:43:39 +0000
parents 03c05458c97e
children 4795469428b3
files lisp/bookmark.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/bookmark.el	Tue Sep 25 10:42:46 2007 +0000
+++ b/lisp/bookmark.el	Tue Sep 25 10:43:39 2007 +0000
@@ -1585,7 +1585,7 @@
     (insert "% Bookmark\n- --------\n")
     (add-text-properties (point-min) (point)
 			 '(font-lock-face bookmark-menu-heading))
-    (mapcar
+    (mapc
      (lambda (full-record)
        ;; if a bookmark has an annotation, prepend a "*"
        ;; in the list of bookmarks.
@@ -1802,7 +1802,7 @@
   (let ((old-buf (current-buffer)))
     (pop-to-buffer (get-buffer-create "*Bookmark Annotation*") t)
     (delete-region (point-min) (point-max))
-    (mapcar
+    (mapc
      (lambda (full-record)
        (let* ((name (bookmark-name-from-full-record full-record))
               (ann  (bookmark-get-annotation name)))