changeset 84866:45ab0bfaaa12

(ffap-replace-file-component): Use `mapc' rather than `mapcar'.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 25 Sep 2007 11:03:35 +0000
parents 4dd4685a454f
children 52075b268fc9
files lisp/ffap.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ffap.el	Tue Sep 25 11:02:09 2007 +0000
+++ b/lisp/ffap.el	Tue Sep 25 11:03:35 2007 +0000
@@ -482,7 +482,7 @@
   "In remote FULLNAME, replace path with NAME.  May return nil."
   ;; Use ange-ftp or efs if loaded, but do not load them otherwise.
   (let (found)
-    (mapcar
+    (mapc
      (function (lambda (sym) (and (fboundp sym) (setq found sym))))
      '(
        efs-replace-path-component