diff options
Diffstat (limited to 'lib/net/jao-notmuch.el')
| -rw-r--r-- | lib/net/jao-notmuch.el | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el index aa82459..48a8ff8 100644 --- a/lib/net/jao-notmuch.el +++ b/lib/net/jao-notmuch.el @@ -357,18 +357,6 @@ (seq-sort-by #'length #'<)))) (format-spec fmt `((?s . ,(mapconcat #'identity ts " ")))))) -(defun jao-notmuch-format-author (width msg) - (let* ((headers (plist-get msg :headers)) - (auth (notmuch-tree-clean-address (plist-get headers :From))) - (awidth (string-width auth)) - (auth (if (> awidth width) - (substring auth 0 width) - (concat auth (make-string (- width awidth) 32)))) - (face (if (plist-get msg :match) - 'notmuch-tree-match-author-face - 'notmuch-tree-no-match-author-face))) - (propertize auth 'face face))) - (defun jao-notmuch-format-tree-and-subject (fmt msg) (let ((tr (notmuch-tree-format-field "tree" " %s" msg)) (sb (notmuch-tree-format-field "subject" " %s" msg))) |