Changing occur-hook to occur-functions

[Juanma Barranquero]

I'd like to change `occur-hook' to `occur-functions', and pass it the
current occur buffer (which can be different of "*Occur*").

This is not an incompatible change, as `occur-hook' is not in 21.4.

-- 
                    /L/e/k/t/u


Index: lisp/replace.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/replace.el,v
retrieving revision 1.216
diff -r1.216 replace.el
721,722c721,723
< (defcustom occur-hook nil
<   "Hook run when `occur' is called."
---
> (defcustom occur-functions nil
>   "List of functions run when `occur' is called.
> Each function is passed one argument, the Occur mode buffer."
1052c1053
<       (run-hooks 'occur-hook)))))
---
>       (run-hook-with-args 'occur-functions occur-buf)))))