From 8f6895b966561c206da4bc58eb08aba8846d31c7 Mon Sep 17 00:00:00 2001 From: Ruijie Yu Date: Fri, 12 May 2023 10:56:33 +0800 Subject: [PATCH] Fix more defcustom type errors and reworded docs * mu4e/mu4e-draft.el (mu4e-compose-reply-recipients): (mu4e-compose-reply-to-address): * mu4e/mu4e-thread.el (mu4e-thread-fold-single-children): Clarify docstrings and fixed type definitions. --- mu4e/mu4e-draft.el | 17 +++++++++-------- mu4e/mu4e-thread.el | 4 ++-- 2 files changed, 11 insertions(+), 10 deletions(-) diff --git a/mu4e/mu4e-draft.el b/mu4e/mu4e-draft.el index d6884468..28bac86c 100644 --- a/mu4e/mu4e-draft.el +++ b/mu4e/mu4e-draft.el @@ -40,18 +40,19 @@ (defcustom mu4e-compose-reply-recipients 'ask "Which recipients to use when replying to a message. -May be a symbol `ask', `all', `sender'. Note that that only -applies to non-mailing-list message; for those, mu4e always -asks." - :type '(choice ask - all - sender) +May be a symbol `ask', `all', `sender'. Note that this option +only applies to non-mailing-list message; for mailing-list +messages, mu4e always asks." + :type '(choice (const ask) + (const all) + (const sender)) :group 'mu4e-compose) (defcustom mu4e-compose-reply-to-address nil - "The Reply-To address. + "When non-nil, the Reply-To address. Useful when this is not equal to the From: address." - :type 'string + :type '(choice (const :tag "Same as the \"From:\" address" nil) + string) :group 'mu4e-compose) (defcustom mu4e-compose-forward-as-attachment nil diff --git a/mu4e/mu4e-thread.el b/mu4e/mu4e-thread.el index 67419e33..03fcb62f 100644 --- a/mu4e/mu4e-thread.el +++ b/mu4e/mu4e-thread.el @@ -53,10 +53,10 @@ :group 'mu4e-headers) (defcustom mu4e-thread-fold-single-children nil - "If set to t fold even if there is only a single child. + "When non-nil, fold a thread even if there is only a single child. Otherwise, do not not fold single children since would simply hide the single child." - :type 'number + :type 'boolean :group 'mu4e-headers) (defface mu4e-thread-fold-face