(Info-fontify-node): Add help-echo for menu items.

diff --git a/lisp/info.el b/lisp/info.el
index 14c6b13cda083ea5c7f1c70cf22201d842ce220c..e02ae97a0e197fcd481d58d86944625503896133 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -2450,10 +2450,10 @@ the variable `Info-file-list-for-emacs'."
                  (put-text-property (match-beginning 0)
                                     (1+ (match-beginning 0))
                                     'face 'info-menu-5))
-             (put-text-property (match-beginning 1) (match-end 1)
-                                'face 'info-xref)
-             (put-text-property (match-beginning 1) (match-end 1)
-                                'mouse-face 'highlight))))
+             (add-text-properties (match-beginning 1) (match-end 1)
+                                  '(face info-xref
+                                    mouse-face highlight
+                                    help-echo "mouse-2: go to this node")))))
       (set-buffer-modified-p nil))))
 \f