summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--doc/misc/flymake.texi3
-rw-r--r--etc/NEWS5
-rw-r--r--lisp/progmodes/flymake.el7
3 files changed, 14 insertions, 1 deletions
diff --git a/doc/misc/flymake.texi b/doc/misc/flymake.texi
index 0db02608dd2..953e4605e98 100644
--- a/doc/misc/flymake.texi
+++ b/doc/misc/flymake.texi
@@ -265,6 +265,9 @@ This section summarizes customization variables used for the
configuration of the Flymake user interface.
@vtable @code
+@item flymake-mode-line-lighter
+The name of the mode. Defaults to @samp{Flymake}.
+
@item flymake-mode-line-format
Format to use for the Flymake mode line indicator.
diff --git a/etc/NEWS b/etc/NEWS
index 40e914cd320..e97f545dda9 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -669,6 +669,11 @@ script that was used in ancient South Asia. A new input method,
* Changes in Specialized Modes and Packages in Emacs 29.1
+** Flymake
+
++++
+*** New user option 'flymake-mode-line-lighter'.
+
+++
** New minor mode 'word-wrap-whitespace-mode' for extending 'word-wrap'.
This mode switches 'word-wrap' on, and breaks on all the whitespace
diff --git a/lisp/progmodes/flymake.el b/lisp/progmodes/flymake.el
index 8cbebe78fe1..b5f4fff3c31 100644
--- a/lisp/progmodes/flymake.el
+++ b/lisp/progmodes/flymake.el
@@ -1358,6 +1358,11 @@ This is a suitable place for placing the `flymake-error-counter',
Separating each of these with space is not necessary."
:type '(repeat (choice string symbol)))
+(defcustom flymake-mode-line-lighter "Flymake"
+ "The string to use in the Flymake mode line."
+ :type 'string
+ :version "29.1")
+
(defvar flymake-mode-line-title '(:eval (flymake--mode-line-title))
"Mode-line construct to show Flymake's mode name and menu.")
@@ -1386,7 +1391,7 @@ correctly.")
(defun flymake--mode-line-title ()
`(:propertize
- "Flymake"
+ ,flymake-mode-line-lighter
mouse-face mode-line-highlight
help-echo
,(lambda (&rest _)