From a865de85dabe98dce5e45396f0dd0612cff9d3c9 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sun, 17 Jun 2001 11:25:12 +0000 Subject: [PATCH] (tex-validate-buffer): Add help-echo to mouse-highlighted text. --- lisp/textmodes/tex-mode.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el index ef5004fffd5..e74f64ef23b 100644 --- a/lisp/textmodes/tex-mode.el +++ b/lisp/textmodes/tex-mode.el @@ -999,8 +999,10 @@ on the line for the invalidity you want to see." (forward-char (- start end)) (setq text-beg (point-marker)) (insert (format "%3d: " linenum)) - (put-text-property text-beg (- text-end 1) - 'mouse-face 'highlight) + (add-text-properties + text-beg (- text-end 1) + '(mouse-face highlight + help-echo "mouse-2: go to this invalidity")) (put-text-property text-beg (- text-end 1) 'occur tem))))) (goto-char prev-end)))) -- 2.39.2