# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1190765657 0
# Node ID 38183e606be57607b8ed64a3d971ac00d7b49f69
# Parent  789f9201f375252dcb29cac9d4ed7467d7f6e45d
(elp-results): Use `mapc' rather than `mapcar'.

diff -r 789f9201f375 -r 38183e606be5 lisp/emacs-lisp/elp.el
--- a/lisp/emacs-lisp/elp.el	Wed Sep 26 00:13:53 2007 +0000
+++ b/lisp/emacs-lisp/elp.el	Wed Sep 26 00:14:17 2007 +0000
@@ -615,7 +615,7 @@
       ;; buffer
       (if elp-sort-by-function
 	  (setq resvec (sort resvec elp-sort-by-function)))
-      (mapcar 'elp-output-result resvec))
+      (mapc 'elp-output-result resvec))
     ;; now pop up results buffer
     (set-buffer curbuf)
     (pop-to-buffer resultsbuf)