diff options
| author | David Bremner <david@tethera.net> | 2022-07-16 17:22:27 -0400 |
|---|---|---|
| committer | David Bremner <david@tethera.net> | 2022-07-30 08:53:25 -0300 |
| commit | 9d013801bb6efaded7d35e3ceb9e37331ce353bb (patch) | |
| tree | 561f83c199a12923ab3451645691a17a65520bd0 /emacs/notmuch-tree.el | |
| parent | dc2097ea9f5be36367a100cbf005f5344e53aa58 (diff) | |
emacs: update defcustom for notmuch-unthreaded-result-format
This is essentially a copy of that for notmuch-tree-result-format,
aside from the default value.
Diffstat (limited to 'emacs/notmuch-tree.el')
| -rw-r--r-- | emacs/notmuch-tree.el | 20 |
1 files changed, 11 insertions, 9 deletions
diff --git a/emacs/notmuch-tree.el b/emacs/notmuch-tree.el index 68614623..f63ac9a5 100644 --- a/emacs/notmuch-tree.el +++ b/emacs/notmuch-tree.el @@ -142,7 +142,11 @@ Note that the author string should not contain whitespace ("tags" . "(%s)")) "Result formatting for unthreaded tree view. -Supported fields are: date, authors, subject, tree, tags. +List of pairs of (field . format-string). Supported field +strings are: \"date\", \"authors\", \"subject\", \"tree\", +\"tags\". It is also supported to pass a function in place of a +field-name. In this case the function is passed the thread +object (plist) and format string. Tree means the thread tree box graphics. The field may also be a list in which case the formatting rules are @@ -150,14 +154,12 @@ applied recursively and then the output of all the fields in the list is inserted according to format-string. Note that the author string should not contain whitespace -\(put it in the neighbouring fields instead). For example: - (setq notmuch-unthreaded-result-format - '((\"authors\" . \"%-40s\") - (\"subject\" . \"%s\")))" - :type '(alist :key-type (choice string - (alist :key-type string - :value-type string)) - :value-type string) +\(put it in the neighbouring fields instead)." + + :type `(alist :key-type (choice ,notmuch-tree--field-names + (alist :key-type ,notmuch-tree--field-names + :value-type (string :tag "Format"))) + :value-type (string :tag "Format")) :group 'notmuch-tree) (defun notmuch-tree-result-format () |