Mercurial > emacs
changeset 34058:9f5e2364ef2b
(message-mail-alias-type): Customize.
(message-headers): Remove duplicate defgroup.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Thu, 30 Nov 2000 17:04:49 +0000 |
| parents | 98bd49d8cf7d |
| children | c40dbebdad05 |
| files | lisp/gnus/message.el |
| diffstat | 1 files changed, 6 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/message.el Thu Nov 30 16:46:52 2000 +0000 +++ b/lisp/gnus/message.el Thu Nov 30 17:04:49 2000 +0000 @@ -649,10 +649,14 @@ PREDICATE returns non-nil. FUNCTION is called with one parameter -- the prefix.") -(defvar message-mail-alias-type 'abbrev +(defcustom message-mail-alias-type 'abbrev "*What alias expansion type to use in Message buffers. The default is `abbrev', which uses mailabbrev. nil switches -mail aliases off.") +mail aliases off." + :group 'message + :link '(custom-manual "(message)Mail Aliases") + :type '(choice (const :tag "Use Mailabbrev" abbrev) + (const :tag "No expansion" nil))) (defcustom message-auto-save-directory (file-name-as-directory (nnheader-concat message-directory "drafts")) @@ -700,10 +704,6 @@ (defvar message-mode-abbrev-table text-mode-abbrev-table "Abbrev table used in Message mode buffers. Defaults to `text-mode-abbrev-table'.") -(defgroup message-headers nil - "Message headers." - :link '(custom-manual "(message)Variables") - :group 'message) (defface message-header-to-face '((((class color)