1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00

Prefer HTTPS to HTTP in ffap

* lisp/ffap.el (ffap-fixup-machine): Prefer HTTPS to HTTP for things
looking like URIs (for example www.example.org).
This commit is contained in:
Stefan Kangas 2023-10-24 22:40:12 +02:00
parent 64aa01f60a
commit 643c67cf23

View file

@ -554,7 +554,7 @@ Looks at `ffap-ftp-default-user', returns \"\" for \"localhost\"."
(concat "gopher://" mach "/"))
;; www.ncsa.uiuc.edu
((and (string-match "\\`w\\(ww\\|eb\\)[-.]" mach))
(concat "http://" mach "/"))
(concat "https://" mach "/"))
;; More cases?
(ffap-ftp-regexp (ffap-host-to-filename mach))
))