mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-11 16:08:13 +00:00
Code Issues Releases Activity

(ffap-replace-file-component): Use mapc' rather than mapcar'.

Browse Source
This commit is contained in:
Juanma Barranquero 2007-09-25 11:03:35 +00:00
parent 82af63125c
commit dabec3c9cd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ffap.el
View File

@ -482,7 +482,7 @@ Returned values:
"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