summaryrefslogtreecommitdiff
path: root/lisp/mail/mail-hist.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-06-23 22:15:43 +0000
committerRichard M. Stallman <rms@gnu.org>1995-06-23 22:15:43 +0000
commit8a2b28d2a0eeec96ff744a01bae8023d674deeb1 (patch)
tree8bf667e74c896e117a20c3c216666dece335b2e5 /lisp/mail/mail-hist.el
parent9e0cc6e686a69b95b2fe5d15e6d1850a2b7f27b1 (diff)
downloademacs-8a2b28d2a0eeec96ff744a01bae8023d674deeb1.tar.gz
emacs-8a2b28d2a0eeec96ff744a01bae8023d674deeb1.tar.bz2
emacs-8a2b28d2a0eeec96ff744a01bae8023d674deeb1.zip
Don't autoload anything to turn on mail-hist.
(mail-hist-enable): New function, autoloaded.
Diffstat (limited to 'lisp/mail/mail-hist.el')
-rw-r--r--lisp/mail/mail-hist.el10
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 @@
(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).