[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-29 a9b46bb25df: Include a help-echo for flymake's modeline counter
|
From: |
Eli Zaretskii |
|
Subject: |
emacs-29 a9b46bb25df: Include a help-echo for flymake's modeline counters |
|
Date: |
Mon, 3 Jul 2023 07:11:48 -0400 (EDT) |
branch: emacs-29
commit a9b46bb25df38e0ca89784afac230408b620b2dc
Author: Spencer Baugh <sbaugh@catern.com>
Commit: Eli Zaretskii <eliz@gnu.org>
Include a help-echo for flymake's modeline counters
This helps clarify what each of these numbers mean. This is inspired
by 'compilation-mode-line-errors' which does the same.
* lisp/progmodes/flymake.el (flymake--mode-line-counter): Add
help-echo to mode line properties. (Bug#64424)
---
lisp/progmodes/flymake.el | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index 6f293acca5e..47dc32f9245 100644
--- a/lisp/progmodes/flymake.el
+++ b/lisp/progmodes/flymake.el
@@ -1473,6 +1473,12 @@ TYPE is usually keyword `:error', `:warning' or `:note'."
,(format "%d" count)
face ,face
mouse-face mode-line-highlight
+ help-echo ,(format "Number of %s; scroll mouse to view."
+ (cond
+ ((eq type :error) "errors")
+ ((eq type :warning) "warnings")
+ ((eq type :note) "notes")
+ (t (format "%s diagnostics" type))))
keymap
,(let ((map (make-sparse-keymap)))
(define-key map (vector 'mode-line
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-29 a9b46bb25df: Include a help-echo for flymake's modeline counters,
Eli Zaretskii <=