From fe2ca5ece2678c45c9643f7b062746665980f40d Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Fri, 12 Oct 2007 06:37:58 +0000 Subject: [PATCH] (reftex-offer-label-menu): Use mapc rather than mapcar. --- lisp/textmodes/reftex-ref.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lisp/textmodes/reftex-ref.el b/lisp/textmodes/reftex-ref.el index 3294c4c22a9..c004602757c 100644 --- a/lisp/textmodes/reftex-ref.el +++ b/lisp/textmodes/reftex-ref.el @@ -665,10 +665,10 @@ When called with 2 C-u prefix args, disable magic word recognition." (save-excursion (while reftex-buffers-with-changed-invisibility (set-buffer (car (car reftex-buffers-with-changed-invisibility))) - (setq buffer-invisibility-spec + (setq buffer-invisibility-spec (cdr (pop reftex-buffers-with-changed-invisibility))))) - (mapcar (lambda (buf) (and (buffer-live-p buf) (bury-buffer buf))) - selection-buffers) + (mapc (lambda (buf) (and (buffer-live-p buf) (bury-buffer buf))) + selection-buffers) (reftex-kill-temporary-buffers)) ;; Add the prefixes, put together the relevant information in the form ;; (LABEL TYPEKEY SEPARATOR) and return a list of those. -- 2.39.2