Merge from emacs--rel--22
[bpt/emacs.git] / lisp / emacs-lisp / elp.el
index ed09599..ade2a23 100644 (file)
@@ -615,7 +615,7 @@ displayed."
       ;; 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)