From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 6 Sep 2021 10:36:32 +0000 (+0200)
Subject: Add a tooltip to the comint-mode mode line format
X-Git-Tag: emacs-28.0.90~1146
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=63618ba27aeb41c1b0348ac5ef7104bc02b97dc7;p=emacs.git

Add a tooltip to the comint-mode mode line format

* lisp/comint.el (comint-mode): Add a tooltip to say what the :run
bit means (bug#13776).
---

diff --git a/lisp/comint.el b/lisp/comint.el
index 9e3042f597b..e058e6b8cf1 100644
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -665,7 +665,8 @@ to continue it.
 \\{comint-mode-map}
 
 Entry to this mode runs the hooks on `comint-mode-hook'."
-  (setq mode-line-process '(":%s"))
+  (setq mode-line-process
+        (list (propertize ":%s" 'help-echo "Process status")))
   (setq-local window-point-insertion-type t)
   (setq-local comint-last-input-start (point-min-marker))
   (setq-local comint-last-input-end (point-min-marker))