(WoMan-highlight-references): Add help-echo to mouse-highlighted text.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cc439515e54b168d401655a3b472871586b00387..7a322e4dfe21f38fd65b779d0f66048389c54b27 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,4 +1,9 @@
-2001-06-12  John Wiegley  <johnw@gnu.org>
+2001-06-19  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * woman.el (WoMan-highlight-references): Add help-echo to
+       mouse-highlighted text.
+
+2001-06-18  John Wiegley  <johnw@gnu.org>
 
        * eshell/esh-mode.el: Disabled a test that often yields false
        failures.

diff --git a/lisp/woman.el b/lisp/woman.el
index 1a3d7e8b75c10db03398204926a1c7a38611e11e..21cd901f404175e754dd46b71ad402fca86016f6 100644 (file)
--- a/lisp/woman.el
+++ b/lisp/woman.el
@@ -1945,8 +1945,9 @@ Otherwise use Man and record start of formatting time."
        ;; Highlight reference when mouse is over it.
        ;; (NB: WoMan does not hyphenate!)
        ;; [See (elisp)Clickable Text]
-       (put-text-property (match-beginning 1) (match-end 1)
-                          'mouse-face 'highlight)
+       (add-text-properties (match-beginning 1) (match-end 1)
+                            '(mouse-face highlight
+                              help-echo "mouse-2: display this man page"))
        ))))
 
 \f