From: Eli Zaretskii <eliz@gnu.org>
Date: Tue, 19 Jun 2001 10:00:43 +0000 (+0000)
Subject: (WoMan-highlight-references): Add help-echo to mouse-highlighted text.
X-Git-Tag: emacs-pretest-21.0.104~216
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a5eab4a9af5731e5d4e178397549f9694c7db119;p=emacs.git

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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cc439515e54..7a322e4dfe2 100644
--- 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 1a3d7e8b75c..21cd901f404 100644
--- 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"))
 	))))