diff options
| -rw-r--r-- | notmuch.org | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/notmuch.org b/notmuch.org index 518832b..ff6553e 100644 --- a/notmuch.org +++ b/notmuch.org @@ -41,7 +41,8 @@ (setq notmuch-tree-result-format '(("date" . "%12s ") ("authors" . "%-35s") - ((("tree" . "%s ") ("subject" . "%s")) . " %-100s") + ;; ("subject" . " %-96s") + ((("tree" . " %s ") ("subject" . "%s")) . " %-100s") ("tags" . " (%s)")) notmuch-search-result-format '(("date" . "%12s ") @@ -283,12 +284,11 @@ notmuch-tree-no-match-tree-face)) (set-face-attribute f nil :family "Fira Code" :foreground fg))) - (defun jao-notmuch--format-field (fun field &rest args) - (let ((rs (apply fun field args))) + (defun jao-notmuch--format-field (fun field fmt msg) + (let ((rs (funcall fun field fmt msg))) (cond ((and (stringp field) (string= field "tree")) (replace-regexp-in-string "►" "" rs)) ;; "→" - ((not (stringp field)) (truncate-string-to-width rs 100)) - (t rs)))) + (t (truncate-string-to-width rs 102 nil nil t))))) (advice-add 'notmuch-tree-format-field :around #'jao-notmuch--format-field) |