Many thanks David; just what I needed. > tested either, but I suppose you would need to write a function like > author-or-to that decides for each message which of those to insert. For the record: (defun -notmuch-authors-or-to (format-string result) (let* ((headers (plist-get result :headers)) (match (plist-get result :match)) (to (plist-get headers :To)) (author (notmuch-tree-clean-address (plist-get headers :From))) (len (length (format format-string ""))) (face (if match 'notmuch-tree-match-author-face 'notmuch-tree-no-match-author-face))) (if (string= author "Jon Hurst") (setq author (concat "To:" (notmuch-tree-clean-address to)))) (when (> (length author) len) (setq author (substring author 0 len))) (propertize (format format-string author) 'face face))) (setq notmuch-tree-result-format '(("date" . "%12s ") (-notmuch-authors-or-to . "%-25s") ((("tree" . "%s") ("subject" . "%s")) . " %-54s ") ("tags" . "(%s)"))) _______________________________________________ notmuch mailing list -- notmuch@notmuchmail.org To unsubscribe send an email to notmuch-leave@notmuchmail.org