procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Respect browse-url-default-scheme on Haiku

Browse source 
* lisp/net/browse-url.el (browse-url-default-haiku-browser): Respect
'browse-url-default-scheme', which currently defaults to "http".
This commit is contained in:
Stefan Kangas 2023-10-25 12:49:19 +02:00
parent 8fef7150d6
commit 0ce068c298
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -1305,7 +1305,7 @@ Default to the URL around or before point."
(let* ((scheme (save-match-data
(if (string-match "\\(.+\\):/" url)
(match-string 1 url)
"http")))
browse-url-default-scheme)))
(mime (concat "application/x-vnd.Be.URL." scheme)))
(haiku-roster-launch mime (vector url))))