diff options
| -rw-r--r-- | lisp/goto-addr.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/goto-addr.el b/lisp/goto-addr.el index c6e81e9b05b..89645ec08e9 100644 --- a/lisp/goto-addr.el +++ b/lisp/goto-addr.el | |||
| @@ -145,6 +145,7 @@ and `goto-address-fontify-p'." | |||
| 145 | ;;; code to find and goto addresses; much of this has been blatantly | 145 | ;;; code to find and goto addresses; much of this has been blatantly |
| 146 | ;;; snarfed from browse-url.el | 146 | ;;; snarfed from browse-url.el |
| 147 | 147 | ||
| 148 | ;;;###autoload | ||
| 148 | (defun goto-address-at-mouse (event) | 149 | (defun goto-address-at-mouse (event) |
| 149 | "Send to the e-mail address or load the URL clicked with the mouse. | 150 | "Send to the e-mail address or load the URL clicked with the mouse. |
| 150 | Send mail to address at position of mouse click. See documentation for | 151 | Send mail to address at position of mouse click. See documentation for |
| @@ -164,6 +165,7 @@ there, then load the URL at or before the position of the mouse click." | |||
| 164 | (funcall browse-url-browser-function url))) | 165 | (funcall browse-url-browser-function url))) |
| 165 | (funcall goto-address-mail-method address)))))) | 166 | (funcall goto-address-mail-method address)))))) |
| 166 | 167 | ||
| 168 | ;;;###autoload | ||
| 167 | (defun goto-address-at-point () | 169 | (defun goto-address-at-point () |
| 168 | "Send to the e-mail address or load the URL at point. | 170 | "Send to the e-mail address or load the URL at point. |
| 169 | Send mail to address at point. See documentation for | 171 | Send mail to address at point. See documentation for |