mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Rename new option to browse-url-default-scheme

Browse source 
* lisp/net/browse-url.el (browse-url-default-scheme): Rename from
'browse-url-guess-default-scheme'.  Update caller.
Suggested by Eli Zaretskii <eliz@gnu.org>.
This commit is contained in:
Stefan Kangas 2022-07-10 18:44:43 +02:00
parent cfda663282
commit 29684a7342
2 changed files with 7 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/net/browse-url.el
View file

@ -652,8 +652,8 @@ regarding its parameter treatment."
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; URL input
(defcustom browse-url-guess-default-scheme "http"
"URL scheme to use when `browse-url' (and related commands) has to guess.
(defcustom browse-url-default-scheme "http"
"URL scheme that `browse-url' (and related commands) will use by default.
For example, when point is on an URL fragment like
\"www.example.org\", `browse-url' will assume that this is an
@ -669,7 +669,7 @@ websites are increasingly rare, but they do still exist."
(or (thing-at-point 'url t)
;; assume that the user is pointing at something like gnu.org/gnu
(let ((f (thing-at-point 'filename t)))
(and f (concat browse-url-guess-default-scheme "://" f)))))
(and f (concat browse-url-default-scheme "://" f)))))
;; Having this as a separate function called by the browser-specific
;; functions allows them to be stand-alone commands, making it easier