Mercurial > emacs
changeset 12366:8415d665d19f
Don't autoload anything to turn on mail-hist.
(mail-hist-enable): New function, autoloaded.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 23 Jun 1995 22:15:43 +0000 |
| parents | 8fecaa78ac4b |
| children | f268f652055e |
| files | lisp/mail/mail-hist.el |
| diffstat | 1 files changed, 3 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mail/mail-hist.el Fri Jun 23 15:50:17 1995 +0000 +++ b/lisp/mail/mail-hist.el Fri Jun 23 22:15:43 1995 +0000 @@ -61,13 +61,9 @@ (local-set-key "\M-n" 'mail-hist-next-input)) ;;;###autoload -(add-hook 'mail-mode-hook 'mail-hist-define-keys) - -;;;###autoload -(add-hook 'vm-mail-mode-hook 'mail-hist-define-keys) - -;;;###autoload -(add-hook 'mail-send-hook 'mail-hist-put-headers-into-history) +(defun mail-hist-enable () + (add-hook 'mail-mode-hook 'mail-hist-define-keys) + (add-hook 'mail-send-hook 'mail-hist-put-headers-into-history)) (defvar mail-hist-header-ring-alist nil "Alist of form (header-name . history-ring).