From: Dave Love <fx@gnu.org>
Date: Sun, 14 May 2000 16:22:04 +0000 (+0000)
Subject: rmail-show-message-hook): Customize and offer
X-Git-Tag: emacs-pretest-21.0.90~3964
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=187962c499d5d07f749b8a87725920611ed20aaf;p=emacs.git

rmail-show-message-hook): Customize and offer
goto-addr as an option.
---

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index cb18a9053c4..1a32ef1a9da 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -236,8 +236,11 @@ and the value of the environment variable MAIL overrides it)."
   "List of functions to call when Rmail has retrieved new mail.")
 
 ;;;###autoload
-(defvar rmail-show-message-hook nil
-  "List of functions to call when Rmail displays a message.")
+(defcustom rmail-show-message-hook nil
+  "List of functions to call when Rmail displays a message."
+  :type 'hook
+  :options '(goto-addr)
+  :group 'rmail)
 
 ;;;###autoload
 (defvar rmail-quit-hook nil