From: Dave Love <fx@gnu.org>
Date: Sun, 1 Nov 1998 17:08:22 +0000 (+0000)
Subject: (goto-address-at-point, goto-address-at-mouse):
X-Git-Tag: emacs-20.4~1340
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7f52b1242e70c79dd96fcca90013fe4839fa162b;p=emacs.git

(goto-address-at-point, goto-address-at-mouse):
Don't funcall browse-url-browser-function.
---

diff --git a/lisp/goto-addr.el b/lisp/goto-addr.el
index 7a4026158a8..05c55684b45 100644
--- a/lisp/goto-addr.el
+++ b/lisp/goto-addr.el
@@ -196,7 +196,7 @@ there, then load the URL at or before the position of the mouse click."
 	    (let ((url (browse-url-url-at-point)))
 	      (if (string-equal url "")
 		  (error "No e-mail address or URL found")
-		(funcall browse-url-browser-function url)))
+		(browse-url url)))
 	  (funcall goto-address-mail-method address))))))
 
 ;;;###autoload
@@ -212,7 +212,7 @@ there, then load the URL at or before point."
 	  (let ((url (browse-url-url-at-point)))
 	    (if (string-equal url "")
 		(error "No e-mail address or URL found")
-	      (funcall browse-url-browser-function url)))
+	      (browse-url url)))
 	(funcall goto-address-mail-method address)))))
 
 (defun goto-address-find-address-at-point ()