Re: |PATCH| describe-minor-mode and describe-minor-mode-from-indicator

[Masatake YAMATO <jet@gyve.org>]

I wrote:

> Background: Few days ago, I found a strange string
> on mode-line: "doe". I wonder what is "doe". However,
> I cannot find a way to know what is doe. M-x describe-mode
> tells me nothing about doe. Finally I have to do 
> "grep doe emacs/lisp/*.el".

I'm very sorry. This is my misunderstanding.
The code which puts "doe" on the mode string
is at my .emacs;-)

However, I think the follwoing function I wrote is still useful:

     3. I added "Describe `MinorMode'" menu item to "Minor Modes" 
	popup menu. The user can get help about a minor mode with mouse-3.


John Paul Wallington<jpw@shootybangbang.com> lets me know my misunderstanding.
Thank you, John.

Masatake YAMATO

\f
What I put in my .emacs.
;; From: Richard Mlynarik <Mly@POBox.COM>
;; Subject: Re: case-fold-search indicator
;; Newsgroups: gnu.emacs.sources
;; Date: Fri, 22 Jun 2001 22:04:52 GMT

;;    From: jcasadonte@northbound-train.com (Joe Casadonte)
;;    Date: 21 Jun 2001 07:21:42 -0700
   
;;    Before I go and write this myself, does anyone have a nifty way to
;;    indicate whether or not case-fold-search is set?  I'm thinking
;;    something in the modeline, like overwrite does.
   
;; I've been using these since the year dot:

(or (assoc 'case-fold-search minor-mode-alist)
    (setq minor-mode-alist
          (cons '(case-fold-search "" " NoCFS") minor-mode-alist)))
(or (assoc 'debug-on-error minor-mode-alist)
    (setq minor-mode-alist
          (append minor-mode-alist '((debug-on-error " doe")))))
(or (assoc 'debug-on-quit minor-mode-alist)
    (setq minor-mode-alist
          (append minor-mode-alist '((debug-on-quit " doq")))))
(or (assoc 'make-backup-files minor-mode-alist)
    (setq minor-mode-alist
          (append minor-mode-alist '((make-backup-files "" (buffer-file-name " NoBack" ""))))))
(or (assoc 'buffer-auto-save-file-name minor-mode-alist)
    (setq minor-mode-alist
          (append minor-mode-alist '((buffer-auto-save-file-name "" (buffer-file-name " NoSave" ""))))))