Mercurial > emacs
changeset 85194:b4b8e47fe18b
(reftex-erase-all-selection-and-index-buffers)
(reftex-access-parse-file): Use mapc rather than mapcar.
author | Glenn Morris <rgm@gnu.org> |
---|---|
date | Fri, 12 Oct 2007 06:33:19 +0000 |
parents | 2922a5d23b4e |
children | 718f0bcfdb7c |
files | lisp/textmodes/reftex.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/reftex.el Fri Oct 12 06:29:56 2007 +0000 +++ b/lisp/textmodes/reftex.el Fri Oct 12 06:33:19 2007 +0000 @@ -859,12 +859,12 @@ (defun reftex-erase-all-selection-and-index-buffers () ;; Remove all selection buffers associated with current document. - (mapcar + (mapc (lambda (type) (reftex-erase-buffer (reftex-make-selection-buffer-name type))) reftex-typekey-list) ;; Kill all index buffers - (mapcar + (mapc (lambda (tag) (reftex-kill-buffer (reftex-make-index-buffer-name tag))) (cdr (assoc 'index-tags (symbol-value reftex-docstruct-symbol))))) @@ -1339,7 +1339,7 @@ (user-login-name) (user-full-name))) (insert "(set reftex-docstruct-symbol '(\n\n") (let ((standard-output (current-buffer))) - (mapcar + (mapc (lambda (x) (cond ((eq (car x) 'toc) ;; A toc entry. Do not save the marker.