(mh-compose-letter-function): Fix :type.

diff --git a/lisp/mail/mh-comp.el b/lisp/mail/mh-comp.el
index 6bc7082ae11e587e5252dd2f4b51c99f42ba9959..ebbb33a7c802b04aec35f6a6c3ece9b6ef490d4e 100644 (file)
--- a/lisp/mail/mh-comp.el
+++ b/lisp/mail/mh-comp.el
@@ -30,7 +30,7 @@
 
 ;;; Change Log:
 
-;; $Id: mh-comp.el,v 1.19 2000/08/16 20:39:14 monnier Exp $
+;; $Id: mh-comp.el,v 1.20 2000/11/02 12:37:38 gerd Exp $
 
 ;;; Code:
 
@@ -168,7 +168,7 @@ MH lib directory.")
 (defcustom mh-compose-letter-function nil
   "Invoked when setting up a letter draft.
 It is passed three arguments: TO recipients, SUBJECT, and CC recipients."
-  :type 'function
+  :type '(choice (const nil) function)
   :group 'mh-compose)
 
 (defcustom mh-before-send-letter-hook nil