From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 17 Jun 2001 11:17:17 +0000 (+0000)
Subject: (comint-send-input): Add help-echo to mouse-highlighted text.
X-Git-Tag: emacs-pretest-21.0.104~247
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e20e70c3b32eb3b8c390e601695057e92901aa2a;p=emacs.git

(comint-send-input): Add help-echo to mouse-highlighted text.
---

diff --git a/lisp/comint.el b/lisp/comint.el
index 213a0673106..ac5c20d77cb 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1442,6 +1442,9 @@ Similarly for Soar, Scheme, etc."
 		(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