diff options
| -rw-r--r-- | lisp/net/browse-url.el | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/lisp/net/browse-url.el b/lisp/net/browse-url.el index dff587e63ab..b44bb71c046 100644 --- a/lisp/net/browse-url.el +++ b/lisp/net/browse-url.el | |||
| @@ -862,8 +862,7 @@ first, if that exists." | |||
| 862 | ;;;###autoload | 862 | ;;;###autoload |
| 863 | (defun browse-url-at-point (&optional arg) | 863 | (defun browse-url-at-point (&optional arg) |
| 864 | "Ask a WWW browser to load the URL at or before point. | 864 | "Ask a WWW browser to load the URL at or before point. |
| 865 | Don't let you edit the URL like `browse-url'. Variable | 865 | Variable `browse-url-browser-function' says which browser to use." |
| 866 | `browse-url-browser-function' says which browser to use." | ||
| 867 | (interactive "P") | 866 | (interactive "P") |
| 868 | (let ((url (browse-url-url-at-point))) | 867 | (let ((url (browse-url-url-at-point))) |
| 869 | (if url | 868 | (if url |
| @@ -876,9 +875,8 @@ Don't let you edit the URL like `browse-url'. Variable | |||
| 876 | (defun browse-url-at-mouse (event) | 875 | (defun browse-url-at-mouse (event) |
| 877 | "Ask a WWW browser to load a URL clicked with the mouse. | 876 | "Ask a WWW browser to load a URL clicked with the mouse. |
| 878 | The URL is the one around or before the position of the mouse click | 877 | The URL is the one around or before the position of the mouse click |
| 879 | but point is not changed. Don't let you edit the URL like | 878 | but point is not changed. Variable `browse-url-browser-function' |
| 880 | `browse-url'. Variable `browse-url-browser-function' says which browser | 879 | says which browser to use." |
| 881 | to use." | ||
| 882 | (interactive "e") | 880 | (interactive "e") |
| 883 | (save-excursion | 881 | (save-excursion |
| 884 | (mouse-set-point event) | 882 | (mouse-set-point event) |