Mercurial > emacs

comparison lisp/textmodes/tex-mode.el @ 38083:745b05b3e5ed

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(tex-validate-buffer): Add help-echo to mouse-highlighted text.
author Eli Zaretskii <eliz@gnu.org>
date Sun, 17 Jun 2001 11:25:12 +0000
parents 4192225498c7
children 253f761ad37b
comparison
equal deleted inserted replaced
38082:b1c18f0dd970 38083:745b05b3e5ed
997 (insert-buffer-substring buffer start end) 997 (insert-buffer-substring buffer start end)
998 (let (text-beg (text-end (point-marker))) 998 (let (text-beg (text-end (point-marker)))
999 (forward-char (- start end)) 999 (forward-char (- start end))
1000 (setq text-beg (point-marker)) 1000 (setq text-beg (point-marker))
1001 (insert (format "%3d: " linenum)) 1001 (insert (format "%3d: " linenum))
1002 (put-text-property text-beg (- text-end 1) 1002 (add-text-properties
1003 'mouse-face 'highlight) 1003 text-beg (- text-end 1)
1004 '(mouse-face highlight
1005 help-echo "mouse-2: go to this invalidity"))
1004 (put-text-property text-beg (- text-end 1) 1006 (put-text-property text-beg (- text-end 1)
1005 'occur tem))))) 1007 'occur tem)))))
1006 (goto-char prev-end)))) 1008 (goto-char prev-end))))
1007 (with-current-buffer standard-output 1009 (with-current-buffer standard-output
1008 (if (eq num-matches 0) 1010 (if (eq num-matches 0)