From 649d6ff53accc4c07f3f771c7354b95c19511aa2 Mon Sep 17 00:00:00 2001 From: jao Date: Mon, 3 Oct 2022 02:28:02 +0100 Subject: attic --- lib/net/jao-notmuch.el | 12 ------------ 1 file changed, 12 deletions(-) (limited to 'lib/net') 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))) -- cgit v1.2.3