From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 23 Jun 1995 22:15:43 +0000 (+0000)
Subject: Don't autoload anything to turn on mail-hist.
X-Git-Tag: emacs-19.34~3493
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8a2b28d2a0eeec96ff744a01bae8023d674deeb1;p=emacs.git

Don't autoload anything to turn on mail-hist.
(mail-hist-enable): New function, autoloaded.
---

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).