A helper function that makes it easier to write dynamic hooks.

(defun my-hook (hooks)
(with-my-context ()
(eval-dynamic-hooks hooks)))