master 5d152ed: Use HTTP instead of Tramp for the ffap rfc path (and also fix it)

[Lars Ingebrigtsen]

branch: master
commit 5d152ed73754f3fcd8ce7e08bf1cfcf96e9656bb
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Use HTTP instead of Tramp for the ffap rfc path (and also fix it)
    
    * lisp/ffap.el (ffap-rfc-path): Use an URL instead of an FTP tramp
    file, since that's more widely supported (bug#41663).
---
 lisp/ffap.el | 15 ++++++---------
 1 file changed, 6 insertions(+), 9 deletions(-)

diff --git a/lisp/ffap.el b/lisp/ffap.el
index 2c1d3d5..575821b 100644
--- a/lisp/ffap.el
+++ b/lisp/ffap.el
@@ -1049,22 +1049,19 @@ out of NAME."
                         "/pub/gnu/emacs/elisp-archive/"))
     (substring name 2))))
 
-(defcustom ffap-rfc-path
-  (concat (ffap-host-to-filename "ftp.rfc-editor.org") "/in-notes/rfc%s.txt")
+(defcustom ffap-rfc-path "https://www.rfc-editor.org/in-notes/rfc%s.txt";
   "A `format' string making a filename for RFC documents.
-This can be an ange-ftp or Tramp remote filename to download, or
-a local filename if you have full set of RFCs locally.  See also
-`ffap-rfc-directories'."
+This can be an URL, and ange-ftp or Tramp remote filename to
+download, or a local filename if you have full set of RFCs
+locally.  See also `ffap-rfc-directories'."
   :type 'string
-  :version "23.1"
-  :group 'ffap)
+  :version "28.1")
 
 (defcustom ffap-rfc-directories nil
   "A list of directories to look for RFC files.
 If a given RFC isn't in these then `ffap-rfc-path' is offered."
   :type '(repeat directory)
-  :version "23.1"
-  :group 'ffap)
+  :version "23.1")
 
 (defun ffap-rfc (name)
   (let ((num (match-string 1 name)))