diff options
author | Dave Love <[email protected]> | 1998-11-01 17:08:22 +0000 |
---|---|---|
committer | Dave Love <[email protected]> | 1998-11-01 17:08:22 +0000 |
commit | 7f52b1242e70c79dd96fcca90013fe4839fa162b (patch) | |
tree | 452ec3c6a1f1a8113e594636b048473a594cf1ca | |
parent | 1b978bfc85d4695cf22e8617d6d06b6ec4a9a0ee (diff) |
(goto-address-at-point, goto-address-at-mouse):
Don't funcall browse-url-browser-function.
-rw-r--r-- | lisp/goto-addr.el | 4 |
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 () |