From a6639a1637c059d46d2d05374674c1ad014aa2e1 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Wed, 24 Jun 1998 09:16:26 +0000 Subject: [PATCH] (mh-yank-from-start-of-msg): Use `other' widget type. --- lisp/mail/mh-comp.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) 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 "> " -- 2.39.2