mirror of
https://git.notmuchmail.org/git/notmuch
synced 2024-11-24 11:58:10 +01:00
emacs: Fix notmuch-mua-user-agent defcustom
The :options keyword is not meaningful for function type. Also, it was not possible to enter nil value, contrary to the notmuch-mua-user-agent defcustom documentation. Specify the alternatives using choice type, taking nil into account. Signed-off-by: Jani Nikula <jani@nikula.org>
This commit is contained in:
parent
2f7f259d62
commit
d4c598dc9e
1 changed files with 6 additions and 4 deletions
|
@ -35,10 +35,12 @@
|
||||||
"Function used to generate a `User-Agent:' string. If this is
|
"Function used to generate a `User-Agent:' string. If this is
|
||||||
`nil' then no `User-Agent:' will be generated."
|
`nil' then no `User-Agent:' will be generated."
|
||||||
:group 'notmuch
|
:group 'notmuch
|
||||||
:type 'function
|
:type '(choice (const :tag "No user agent string" nil)
|
||||||
:options '(notmuch-mua-user-agent-full
|
(const :tag "Full" notmuch-mua-user-agent-full)
|
||||||
notmuch-mua-user-agent-notmuch
|
(const :tag "Notmuch" notmuch-mua-user-agent-notmuch)
|
||||||
notmuch-mua-user-agent-emacs))
|
(const :tag "Emacs" notmuch-mua-user-agent-emacs)
|
||||||
|
(function :tag "Custom user agent function"
|
||||||
|
:value notmuch-mua-user-agent-full)))
|
||||||
|
|
||||||
(defcustom notmuch-mua-hidden-headers '("^User-Agent:")
|
(defcustom notmuch-mua-hidden-headers '("^User-Agent:")
|
||||||
"Headers that are added to the `message-mode' hidden headers
|
"Headers that are added to the `message-mode' hidden headers
|
||||||
|
|
Loading…
Reference in a new issue