diff options
| author | jao <jao@gnu.org> | 2022-10-03 02:28:02 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-10-03 02:33:52 +0100 |
| commit | 649d6ff53accc4c07f3f771c7354b95c19511aa2 (patch) | |
| tree | ad19073b2225095ccaf48cbb19a5de5ead240152 /lib/net | |
| parent | 00f4ac1320d5f521e34b280a88eca6709cfff890 (diff) | |
| download | elibs-649d6ff53accc4c07f3f771c7354b95c19511aa2.tar.gz elibs-649d6ff53accc4c07f3f771c7354b95c19511aa2.tar.bz2 | |
attic
Diffstat (limited to 'lib/net')
| -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))) |