# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 992776637 0
# Node ID 54047d1b6974a4d4cb570fdc9f0add83c48d54c5
# Parent  4dc11485950d8f14504e077ff780f5f6892e3a66
(comint-send-input): Add help-echo to mouse-highlighted text.

diff -r 4dc11485950d -r 54047d1b6974 lisp/comint.el
--- a/lisp/comint.el	Sun Jun 17 11:16:18 2001 +0000
+++ b/lisp/comint.el	Sun Jun 17 11:17:17 2001 +0000
@@ -1442,6 +1442,9 @@
 		(when comint-highlight-input
 		  (overlay-put over 'face 'comint-highlight-input)
 		  (overlay-put over 'mouse-face 'highlight)
+		  (overlay-put over
+			       'help-echo
+			       "mouse-2: insert previous clicked-on input")
 		  (overlay-put over 'evaporate t))))
 	    (unless comint-use-prompt-regexp-instead-of-fields
 	      ;; Make an overlay for the terminating newline