Re: Letting hooks?

[Tassilo Horn]

Eric Abrahamsen <eric@ericabrahamsen.net> writes:

Hi Eric,

> (defun my-function ()
>   (let ((grommet-created-hook
>        (push my-hook-function
>              grommet-created-hook)))
>     (create-grommet)))

I think `push' is definitively a bad idea, cause it changes
`grommet-created-hook' global value, too.  And `my-hook-function' has to
be quoted.

  (let ((grommet-created-hook
         (cons 'my-hook-function grommet-created-hook)))
    (create-grommet))

should do the trick.

Bye,
Tassilo