Re: How to apply a minor mode to all buffers

[Kevin Rodgers <kevin.d.rodgers@gmail.com>]

leoboiko@gmail.com wrote:
> At Mon, 22 Jan 2007 11:57:35 -0500,
> Stefan Monnier wrote:
>> You could start with find-file-hook.
> 
> find-file-hook won’t apply to buffers unrelated to files, though.
> after-change-major-mode-hook almost does the trick, but it still
> doesn’t get fundamental-mode.

Do you do much editing in Fundamental mode?

> What I’d like is fundamental-mode-hook.
> 
> “Damn vim users”, I said.  “Keep leaving those trailing whitespaces
> all over the place.  It disrupts my mental concentration, for I have
> show-trailing-whitespace globally as t, and I have to stop whatever
> I’m doing to delete-trailing-whitespace.”
> 
> “You could put it in a hook, you know”, said my friend.
> 
> “Yes, of course”, I replied, with my best “why I didn’t think of this
> before” voice.  “But I need to test whether the buffer is read-only,
> else we’d generate lots of beeps”:
> 
> 
> (setq-default show-trailing-whitespace nil)
> 
> (defun leoboiko/delete-and-show-trailing-whitespace ()
>   "If the buffer is not readonly, delete trailing whitespace and turn on
> `show-trailing-whitespace'."
>   (interactive)
>   (if (not buffer-read-only)
>       (progn
>         (delete-trailing-whitespace)
>         (setq show-trailing-whitespace t))))

You may still want to show it even if you can't delete it:

(unless buffer-read-only
   (delete-trailing-whitespace))
(show-trailing-whitespace)

> (add-hook 'hook-for-all-buffers ;; what to put here?
>           'leoboiko/delete-and-show-trailing-whitespace)
> 
> My first attempt was find-file-hook, but I want it to apply to
> non-file buffers too (like email drafts, etc).  My second attempt was
> fundamental-mode-hook, but there is no such thing.  My third attempt
> (after reading fundamental-mode’s source) was
> after-change-major-mode-hook, but this still doesn’t work for
> fundamental buffers (say, if I simply create a scratch buffer).

How about:

(add-hook 'find-file-hook 'delete/show-trailing-whitespace)
(add-hook 'text-mode-hook 'delete/show-trailing-whitespace)
(setq default-major-mode 'text-mode)

> The rationale I saw about why there is no fundamental-mode-hook is
> that variable customizations on fundamental mode are really global
> customizations.  That’s nice, but I don’t want to change variables, I
> want to be able to run arbitrary functions every time a buffer is
> created.

-- 
Kevin Rodgers
Denver, Colorado, USA