mirror of https://github.com/djcb/mu.git
fix mu4e-header-fields custom type
Also fix some option doc-strings.
This commit is contained in:
parent
ec106e38bf
commit
73916f1210
|
@ -51,12 +51,19 @@
|
||||||
(:flags . 6)
|
(:flags . 6)
|
||||||
(:from . 22)
|
(:from . 22)
|
||||||
(:subject . nil))
|
(:subject . nil))
|
||||||
"A list of header fields to show in the headers buffer, and their
|
"A list of header fields to show in the headers buffer.
|
||||||
respective widths in characters. A width of `nil' means
|
Each element has the form (HEADER . WIDTH), where HEADER is one
|
||||||
'unrestricted', and this is best reserved fo the rightmost (last)
|
of the available headers (see `mu4e-header-info') and WIDTH is
|
||||||
field. For the complete list of available headers, see
|
the respective width in characters. A width of `nil' means
|
||||||
`mu4e-header-info'."
|
'unrestricted', and this is best reserved for the
|
||||||
:type (list 'symbol)
|
rightmost (last) field."
|
||||||
|
:type `(repeat (cons (choice ,@(mapcar (lambda (h)
|
||||||
|
(list 'const :tag
|
||||||
|
(plist-get (cdr h) :help)
|
||||||
|
(car h)))
|
||||||
|
mu4e-header-info))
|
||||||
|
(choice (integer :tag "width")
|
||||||
|
(const :tag "unrestricted width" nil))))
|
||||||
:group 'mu4e-headers)
|
:group 'mu4e-headers)
|
||||||
|
|
||||||
(defcustom mu4e-headers-date-format "%x"
|
(defcustom mu4e-headers-date-format "%x"
|
||||||
|
|
|
@ -500,8 +500,7 @@ headers)."
|
||||||
(:from-or-to .
|
(:from-or-to .
|
||||||
( :name "From/To"
|
( :name "From/To"
|
||||||
:shortname "From/To"
|
:shortname "From/To"
|
||||||
:help "Sender of the message if it's not me; otherwise
|
:help "Sender of the message if it's not me; otherwise the recipient"
|
||||||
the recipient"
|
|
||||||
:sortable nil))
|
:sortable nil))
|
||||||
(:maildir .
|
(:maildir .
|
||||||
( :name "Maildir"
|
( :name "Maildir"
|
||||||
|
@ -538,13 +537,14 @@ headers)."
|
||||||
:shortname "T"
|
:shortname "T"
|
||||||
:help "Recipient of the message"
|
:help "Recipient of the message"
|
||||||
:sortable t)))
|
:sortable t)))
|
||||||
"An alist of all possible header fields and information about
|
"An alist of all possible header fields and information about them.
|
||||||
them.; this is used in the UI (the column headers in the header
|
This is used in the UI (the column headers in the header list,
|
||||||
list, and the fields the message view). Most fields should be
|
and the fields the message view).
|
||||||
self-explanatory. A special one is `:from-or-to', which is equal to
|
|
||||||
`:from' unless `:from' matches `mu4e-user-mail-address-regexp', in
|
|
||||||
which case it will be equal to `:to'.")
|
|
||||||
|
|
||||||
|
Most fields should be self-explanatory. A special one is
|
||||||
|
`:from-or-to', which is equal to `:from' unless `:from' matches
|
||||||
|
`mu4e-user-mail-address-regexp', in which case it will be equal
|
||||||
|
to `:to'.")
|
||||||
|
|
||||||
(defvar mu4e-custom-header-info nil
|
(defvar mu4e-custom-header-info nil
|
||||||
"A list like `mu4e-custom-header-info', but for
|
"A list like `mu4e-custom-header-info', but for
|
||||||
|
|
Loading…
Reference in New Issue