Lines Matching defs:hook
127 (defvaralias 'loadhist-hook-functions 'unload-feature-special-hooks)
141 These are symbols with hook-type values whose names don't end in
142 `-hook' or `-hooks', from which `unload-feature' tries to remove
145 (defvar unload-hook-features-list nil
148 This is meant to be used by FEATURE-unload-hook hooks, see the
158 hooks. Packages may define a hook FEATURE-unload-hook that is called
159 instead of the normal heuristics for doing this. Such a hook should
163 variable `unload-hook-features-list' and could remove features from it
178 (let* ((unload-hook-features-list (feature-symbols feature))
179 (file (pop unload-hook-features-list))
183 (unload-hook (intern-soft (concat (symbol-name feature)
184 "-unload-hook"))))
187 ;; `kill-buffer-hook', `activate-menubar-hook' and the like.)
189 ;; this by adding hooks on the variable `FOO-unload-hook'.
190 (if unload-hook
191 (run-hooks unload-hook)
193 ;; which seem to be hook variables or special hook functions and
205 (dolist (y unload-hook-features-list)
208 (remove-hook x (cdr y)))))))
210 (dolist (y unload-hook-features-list)
216 (dolist (elt unload-hook-features-list)
220 (dolist (x unload-hook-features-list)