diff options
Diffstat (limited to 'lisp')
| -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). |