Mercurial > emacs
diff lisp/apropos.el @ 29498:4b79925ce8fa
*** empty log message ***
author | Gerd Moellmann <gerd@gnu.org> |
---|---|
date | Wed, 07 Jun 2000 15:38:54 +0000 |
parents | cc07870ddb45 |
children | dbfcedec53b3 |
line wrap: on
line diff
--- a/lisp/apropos.el Wed Jun 07 15:38:45 2000 +0000 +++ b/lisp/apropos.el Wed Jun 07 15:38:54 2000 +0000 @@ -112,6 +112,8 @@ map) "Keymap used in Apropos mode.") +(defvar apropos-mode-hook nil + "*Hook run when mode is turned on.") (defvar apropos-regexp nil "Regexp used in current apropos run.") @@ -134,7 +136,8 @@ (kill-all-local-variables) (use-local-map apropos-mode-map) (setq major-mode 'apropos-mode - mode-name "Apropos")) + mode-name "Apropos") + (run-hooks 'apropos-mode-hook)) ;;;###autoload (defun apropos-variable (regexp &optional do-all)