Re: Another changelog rant

[Tollef Fog Heen <tollef@add.no>]

* Peter S Galbraith 

| Tollef Fog Heen wrote:
| 
| > Something like:
| > 
| > (setq find-file-hooks
| >       (cons #'(lambda ()
| > 	       ;; Invoke proper modes when we don't know file extensions
| > 	       (cond ((looking-at "#!.*/perl") (perl-mode))
| > 		     ((looking-at "#!.*/tclsh") (tcl-mode))
| > 		     ((looking-at "#!.*/wish") (tcl-mode))))
| > 	    find-file-hooks))
| > 
| > And add the proper regexp for Debian changelogs.
| 
| Done with add-hook instead of setq, this is an interesting answer.
| :-)

You don't need add-hook, since the setq has find-file-hooks at the end
as well.  I copied the source off somebody else, and don't really know
why it uses setq and cons instead of add-hook.

-- 

Tollef Fog Heen
You Can't Win