Mercurial > emacs

changeset 85196:5aad543561c0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(reftex-select-unmark): Use mapc rather than mapcar.
author Glenn Morris <rgm@gnu.org>
date Fri, 12 Oct 2007 06:36:27 +0000
parents 718f0bcfdb7c
children 861bd8efa4d6
files lisp/textmodes/reftex-sel.el
diffstat 1 files changed, 6 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/textmodes/reftex-sel.el	Fri Oct 12 06:34:33 2007 +0000
+++ b/lisp/textmodes/reftex-sel.el	Fri Oct 12 06:36:27 2007 +0000
@@ -643,12 +643,12 @@
     (and ovl (reftex-delete-overlay ovl))
     (setq reftex-select-marked (delq cell reftex-select-marked))
     (setq cnt (1+ (length reftex-select-marked)))
-    (mapcar (lambda (c)
-              (setq sep (nth 2 c))
-              (reftex-overlay-put (nth 1 c) 'before-string
-                                  (if sep
-                                      (format "*%c%d* " sep (decf cnt))
-                                    (format "*%d*  " (decf cnt)))))
+    (mapc (lambda (c)
+            (setq sep (nth 2 c))
+            (reftex-overlay-put (nth 1 c) 'before-string
+                                (if sep
+                                    (format "*%c%d* " sep (decf cnt))
+                                  (format "*%d*  " (decf cnt)))))
             reftex-select-marked)
     (message "Entry no longer marked")))