aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love <[email protected]>1998-11-01 17:08:22 +0000
committerDave Love <[email protected]>1998-11-01 17:08:22 +0000
commit7f52b1242e70c79dd96fcca90013fe4839fa162b (patch)
tree452ec3c6a1f1a8113e594636b048473a594cf1ca
parent1b978bfc85d4695cf22e8617d6d06b6ec4a9a0ee (diff)
(goto-address-at-point, goto-address-at-mouse):
Don't funcall browse-url-browser-function.
-rw-r--r--lisp/goto-addr.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/goto-addr.el b/lisp/goto-addr.el
index 7a4026158a..05c55684b4 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 ()