Mercurial > emacs
changeset 38079:7563c3b44130
(sh-mark-line): Add help-echo to mouse-highlighted text.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sun, 17 Jun 2001 11:22:35 +0000 |
parents | 8bc0292b0367 |
children | be5236e1efc7 |
files | lisp/progmodes/sh-script.el |
diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/sh-script.el Sun Jun 17 11:21:48 2001 +0000 +++ b/lisp/progmodes/sh-script.el Sun Jun 17 11:22:35 2001 +0000 @@ -2644,7 +2644,10 @@ (setq occur-point (point))) (insert message) (if point - (put-text-property start (point) 'mouse-face 'highlight)) + (add-text-properties + start (point) + '(mouse-face highlight + help-echo "mouse-2: go to the line where I learned this"))) (insert "\n") (if point (progn