diff options
| author | Spencer Baugh | 2023-07-02 12:11:09 -0400 |
|---|---|---|
| committer | Eli Zaretskii | 2023-07-03 14:11:41 +0300 |
| commit | a9b46bb25df38e0ca89784afac230408b620b2dc (patch) | |
| tree | 58e9c9c2f89662bfd309e3923f0906d1034d0b84 | |
| parent | 37ed3d15f38339400eba67647c87fad85de3a384 (diff) | |
| download | emacs-a9b46bb25df38e0ca89784afac230408b620b2dc.tar.gz emacs-a9b46bb25df38e0ca89784afac230408b620b2dc.zip | |
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)
| -rw-r--r-- | lisp/progmodes/flymake.el | 6 |
1 files changed, 6 insertions, 0 deletions
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'." | |||
| 1473 | ,(format "%d" count) | 1473 | ,(format "%d" count) |
| 1474 | face ,face | 1474 | face ,face |
| 1475 | mouse-face mode-line-highlight | 1475 | mouse-face mode-line-highlight |
| 1476 | help-echo ,(format "Number of %s; scroll mouse to view." | ||
| 1477 | (cond | ||
| 1478 | ((eq type :error) "errors") | ||
| 1479 | ((eq type :warning) "warnings") | ||
| 1480 | ((eq type :note) "notes") | ||
| 1481 | (t (format "%s diagnostics" type)))) | ||
| 1476 | keymap | 1482 | keymap |
| 1477 | ,(let ((map (make-sparse-keymap))) | 1483 | ,(let ((map (make-sparse-keymap))) |
| 1478 | (define-key map (vector 'mode-line | 1484 | (define-key map (vector 'mode-line |