emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Masatake YAMATO
Subject: Re: |PATCH| describe-minor-mode and describe-minor-mode-from-indicator
Date: Sat, 18 Jan 2003 23:12:30 +0900 (JST)

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<address@hidden> lets me know my misunderstanding.
Thank you, John.

Masatake YAMATO

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

;;    From: address@hidden (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" ""))))))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]