Commit 7d353d11 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* net/browse-url.el (browse-url-firefox-program): Use iceweasel if

firefox is absent.  Don't autoload.
(browse-url-galeon-program): Don't autoload.
parent d6d23852
2010-04-29 Stefan Monnier <monnier@iro.umontreal.ca>
* net/browse-url.el (browse-url-firefox-program): Use iceweasel if
firefox is absent. Don't autoload.
(browse-url-galeon-program): Don't autoload.
2010-04-28 Chong Yidong <cyd@stupidchicken.com>
* bindings.el (complete-symbol): Move into minibuffer.el.
......
......@@ -313,8 +313,11 @@ Defaults to the value of `browse-url-mozilla-arguments' at the time
:type '(repeat (string :tag "Argument"))
:group 'browse-url)
;;;###autoload
(defcustom browse-url-firefox-program (purecopy "firefox")
(defcustom browse-url-firefox-program
(let ((candidates '("firefox" "iceweasel")))
(while (and candidates (not (executable-find (car candidates))))
(setq candidates (cdr candidates)))
(or (car candidates) "firefox"))
"The name by which to invoke Firefox."
:type 'string
:group 'browse-url)
......@@ -331,8 +334,7 @@ Defaults to the value of `browse-url-firefox-arguments' at the time
:type '(repeat (string :tag "Argument"))
:group 'browse-url)
;;;###autoload
(defcustom browse-url-galeon-program (purecopy "galeon")
(defcustom browse-url-galeon-program "galeon"
"The name by which to invoke Galeon."
:type 'string
:group 'browse-url)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment