[Emacs-diffs] Changes to emacs/lisp/net/browse-url.el

[Richard M. Stallman]

Index: emacs/lisp/net/browse-url.el
diff -u emacs/lisp/net/browse-url.el:1.16 emacs/lisp/net/browse-url.el:1.17
--- emacs/lisp/net/browse-url.el:1.16   Mon Nov 19 14:12:31 2001
+++ emacs/lisp/net/browse-url.el        Sat Nov 24 19:04:41 2001
@@ -335,6 +335,13 @@
   :type '(repeat (string :tag "Argument"))
   :group 'browse-url)
 
+(defcustom browse-url-galeon-new-window-is-tab nil
+  "Whether to open up new windows in a tab or a new window.
+If non-nil, then open the URL in a new tab rather than a new window if
+`browse-url-galeon' is asked to open it in a new window."
+  :type 'boolean
+  :group 'browse-url)
+
 ;;;###autoload
 (defcustom browse-url-new-window-flag nil
   "*If non-nil, always open a new browser window with appropriate browsers.
@@ -893,7 +900,10 @@
                         browse-url-galeon-program
                         (append
                          browse-url-galeon-arguments
-                          (if new-window '("-w" "--noraise"))
+                          (if (browse-url-maybe-new-window new-window)
+                             (if browse-url-galeon-new-window-is-tab
+                                 '("--new-tab")
+                               '("--new-window" "--no-raise")))
                           (list "-x" url)))))
     (set-process-sentinel process
                          `(lambda (process change)