projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b93f931
)
Respect `browse-url-default-scheme` on Android
author
Stefan Kangas
<stefankangas@gmail.com>
Wed, 1 Nov 2023 00:39:27 +0000
(
01:39
+0100)
committer
Stefan Kangas
<stefankangas@gmail.com>
Wed, 1 Nov 2023 00:39:53 +0000
(
01:39
+0100)
* lisp/net/browse-url.el (browse-url-default-android-browser):
Respect 'browse-url-default-scheme'.
lisp/net/browse-url.el
patch
|
blob
|
history
diff --git
a/lisp/net/browse-url.el
b/lisp/net/browse-url.el
index dfb2243988d5235dc64147f81146e04b56d8f53d..74740af3bd62c4a2f84fe50fd4b8406728fdc612 100644
(file)
--- a/
lisp/net/browse-url.el
+++ b/
lisp/net/browse-url.el
@@
-1337,7
+1337,7
@@
point."
(setq url (browse-url-encode-url url)))
;; Make sure the URL starts with an appropriate scheme.
(unless (string-match "\\(.+\\):/" url)
- (setq url (concat
"http
://" url)))
+ (setq url (concat
browse-url-default-scheme "
://" url)))
(android-browse-url url browse-url-android-share))
(function-put 'browse-url-default-android-browser