X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/9ee365d565205366d61d9b50dd2a15ef903be983..dabec3c9cd3e24acc367699424e6754ebd1476a7:/lisp/ffap.el diff --git a/lisp/ffap.el b/lisp/ffap.el index 314d48e9ca..8c338bd947 100644 --- a/lisp/ffap.el +++ b/lisp/ffap.el @@ -13,7 +13,7 @@ ;; GNU Emacs is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation; either version 2, or (at your option) +;; the Free Software Foundation; either version 3, or (at your option) ;; any later version. ;; GNU Emacs is distributed in the hope that it will be useful, @@ -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