Mercurial > emacs

changeset 84335:cc5b3cf69a31

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(checkdoc-minor-mode-string): New. (checkdoc-minor-mode): Allow user to specify lighter via checkdoc-minor-mode-string.
author Glenn Morris <rgm@gnu.org>
date Thu, 06 Sep 2007 05:19:23 +0000
parents ffb55a48639f
children 1924e5040965
files lisp/emacs-lisp/checkdoc.el
diffstat 1 files changed, 7 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/checkdoc.el	Thu Sep 06 05:19:06 2007 +0000
+++ b/lisp/emacs-lisp/checkdoc.el	Thu Sep 06 05:19:23 2007 +0000
@@ -199,6 +199,12 @@
   :group 'lisp
   :version "20.3")
 
+(defcustom checkdoc-minor-mode-string " CDoc"
+  "*String to display in mode line when Checkdoc mode is enabled; nil for none."
+  :type '(choice string (const :tag "None" nil))
+  :group 'checkdoc
+  :version "23.1")
+
 (defcustom checkdoc-autofix-flag 'semiautomatic
   "Non-nil means attempt auto-fixing of doc strings.
 If this value is the symbol `query', then the user is queried before
@@ -1251,7 +1257,7 @@
 checking of documentation strings.
 
 \\{checkdoc-minor-mode-map}"
-  nil " CDoc" nil
+  nil checkdoc-minor-mode-string nil
   :group 'checkdoc)
 
 ;;; Subst utils