From: Andreas Schwab <schwab@suse.de>
Date: Wed, 24 Jun 1998 09:16:26 +0000 (+0000)
Subject: (mh-yank-from-start-of-msg): Use `other' widget
X-Git-Tag: emacs-20.3~489
X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/a6639a1637c059d46d2d05374674c1ad014aa2e1

(mh-yank-from-start-of-msg): Use `other' widget
type.
---

diff --git a/lisp/mail/mh-comp.el b/lisp/mail/mh-comp.el
index fcf5a64d0b..c478cef18e 100644
--- a/lisp/mail/mh-comp.el
+++ b/lisp/mail/mh-comp.el
@@ -26,7 +26,7 @@
 
 ;;; Change Log:
 
-;; $Id: mh-comp.el,v 1.11 1997/09/15 19:45:16 rms Exp rms $
+;; $Id: mh-comp.el,v 1.12 1997/09/19 04:27:56 rms Exp $
 
 ;;; Code:
 
@@ -100,7 +100,9 @@ If non-nil, include the entire message.  If the symbol `body', then yank the
 message minus the header.  If nil, yank only the portion of the message
 following the point.  If the show buffer has a region, this variable is
 ignored."
-  :type '(choice (const t) (const nil) (const body))
+  :type '(choice (const :tag "Below point" nil)
+		 (const :tag "Without header" body)
+		 (other :tag "Entire message" t))
   :group 'mh-compose)
 
 (defcustom mh-ins-buf-prefix "> "