aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorJuanma Barranquero2007-09-25 11:03:35 +0000
committerJuanma Barranquero2007-09-25 11:03:35 +0000
commitdabec3c9cd3e24acc367699424e6754ebd1476a7 (patch)
treec08c9a6589bdc917292f7fac226c23719ed21a23 /lisp
parent82af63125cda3637c285499926de9ff590cb7e66 (diff)
downloademacs-dabec3c9cd3e24acc367699424e6754ebd1476a7.tar.gz
emacs-dabec3c9cd3e24acc367699424e6754ebd1476a7.zip
(ffap-replace-file-component): Use `mapc' rather than `mapcar'.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ffap.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ffap.el b/lisp/ffap.el
index 80b94a4d3ba..8c338bd947a 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -482,7 +482,7 @@ Returned values:
482 "In remote FULLNAME, replace path with NAME. May return nil." 482 "In remote FULLNAME, replace path with NAME. May return nil."
483 ;; Use ange-ftp or efs if loaded, but do not load them otherwise. 483 ;; Use ange-ftp or efs if loaded, but do not load them otherwise.
484 (let (found) 484 (let (found)
485 (mapcar 485 (mapc
486 (function (lambda (sym) (and (fboundp sym) (setq found sym)))) 486 (function (lambda (sym) (and (fboundp sym) (setq found sym))))
487 '( 487 '(
488 efs-replace-path-component 488 efs-replace-path-component