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

Allow 'browse-url-emacs' to fetch URL in the selected window

Browse source 
* lisp/net/browse-url.el (browse-url-emacs): Use same-window argument.
(Bug#30673)
This commit is contained in:
Pierre Téchoueyres 2018-03-01 22:22:05 +01:00 • committed by Eli Zaretskii
parent 2db57579b0
commit f022b1bdf8
1 changed files with 2 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

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

@ -1242,18 +1242,14 @@ used instead of `browse-url-new-window-flag'."
(defvar url-handler-regexp)
;;;###autoload
(defun browse-url-emacs (url &optional _new-window)
(defun browse-url-emacs (url &optional same-window)
"Ask Emacs to load URL into a buffer and show it in another window."
(interactive (browse-url-interactive-arg "URL: "))
(require 'url-handlers)
(let ((file-name-handler-alist
(cons (cons url-handler-regexp 'url-file-handler)
file-name-handler-alist)))
;; Ignore `new-window': with all other browsers the URL is always shown
;; in another window than the current Emacs one since it's shown in
;; another application's window.
;; (if new-window (find-file-other-window url) (find-file url))
(find-file-other-window url)))
(if same-window (find-file url) (find-file-other-window url))))
;;;###autoload
(defun browse-url-gnome-moz (url &optional new-window)