mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-10 09:12:15 +00:00
Code Issues Releases Activity

(goto-address-fontify): Add help-echo property.

Browse Source
This commit is contained in:
Dave Love 2000-05-25 18:15:44 +00:00
parent 3239529732
commit fa59072afd
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/net/goto-addr.el
View File

@ -146,6 +146,8 @@ and `goto-address-fontify-p'."
(overlay-put this-overlay 'face goto-address-url-face))
(overlay-put this-overlay
'mouse-face goto-address-url-mouse-face)
(overlay-put this-overlay
'help-echo "mouse-2: follow URL")
(overlay-put this-overlay
'local-map goto-address-highlight-keymap)))
(goto-char (point-min))
@ -157,6 +159,8 @@ and `goto-address-fontify-p'."
(overlay-put this-overlay 'face goto-address-mail-face))
(overlay-put this-overlay 'mouse-face
goto-address-mail-mouse-face)
(overlay-put this-overlay
'help-echo "mouse-2: follow URL")
(overlay-put this-overlay
'local-map goto-address-highlight-keymap)))))
(and (buffer-modified-p)