Mercurial > emacs

diff lisp/net/browse-url.el @ 67017:fb42f801f872

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(browse-url-default-browser): Signal an error if no usable browser can be found, rather than try to load w3.
author Romain Francoise <romain@orebokech.com>
date Sat, 19 Nov 2005 15:57:20 +0000
parents 71a815b63b2b
children 067115a6e738 7beb78bc1f8e
line wrap: on
line diff
--- a/lisp/net/browse-url.el	Sat Nov 19 13:19:58 2005 +0000
+++ b/lisp/net/browse-url.el	Sat Nov 19 15:57:20 2005 +0000
@@ -864,7 +864,9 @@
      ((executable-find "tellw3b") 'browse-url-iximosaic)
      ((executable-find browse-url-xterm-program) 'browse-url-lynx-xterm)
      ((executable-find "mmm") 'browse-url-mmm)
-     (t 'browse-url-w3))
+     ((locate-library "w3") 'browse-url-w3)
+     (t
+      (lambda (&ignore args) (error "No usable browser found"))))
      url args))
 
 ;;;###autoload