diff options
| author | Richard M. Stallman | 1995-06-23 22:15:43 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-06-23 22:15:43 +0000 |
| commit | 8a2b28d2a0eeec96ff744a01bae8023d674deeb1 (patch) | |
| tree | 8bf667e74c896e117a20c3c216666dece335b2e5 | |
| parent | 9e0cc6e686a69b95b2fe5d15e6d1850a2b7f27b1 (diff) | |
| download | emacs-8a2b28d2a0eeec96ff744a01bae8023d674deeb1.tar.gz emacs-8a2b28d2a0eeec96ff744a01bae8023d674deeb1.zip | |
Don't autoload anything to turn on mail-hist.
(mail-hist-enable): New function, autoloaded.
| -rw-r--r-- | lisp/mail/mail-hist.el | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/lisp/mail/mail-hist.el b/lisp/mail/mail-hist.el index e0608a4cefd..fa0db93e2c0 100644 --- a/lisp/mail/mail-hist.el +++ b/lisp/mail/mail-hist.el | |||
| @@ -61,13 +61,9 @@ | |||
| 61 | (local-set-key "\M-n" 'mail-hist-next-input)) | 61 | (local-set-key "\M-n" 'mail-hist-next-input)) |
| 62 | 62 | ||
| 63 | ;;;###autoload | 63 | ;;;###autoload |
| 64 | (add-hook 'mail-mode-hook 'mail-hist-define-keys) | 64 | (defun mail-hist-enable () |
| 65 | 65 | (add-hook 'mail-mode-hook 'mail-hist-define-keys) | |
| 66 | ;;;###autoload | 66 | (add-hook 'mail-send-hook 'mail-hist-put-headers-into-history)) |
| 67 | (add-hook 'vm-mail-mode-hook 'mail-hist-define-keys) | ||
| 68 | |||
| 69 | ;;;###autoload | ||
| 70 | (add-hook 'mail-send-hook 'mail-hist-put-headers-into-history) | ||
| 71 | 67 | ||
| 72 | (defvar mail-hist-header-ring-alist nil | 68 | (defvar mail-hist-header-ring-alist nil |
| 73 | "Alist of form (header-name . history-ring). | 69 | "Alist of form (header-name . history-ring). |