summaryrefslogtreecommitdiffhomepage
path: root/lib/net/jao-notmuch.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2026-11-05 19:19:40 +0000
committerjao <jao@gnu.org>2026-11-05 19:20:09 +0000
commit0322499c46a78c63ae25ac4da9c790bc1fdc0915 (patch)
tree93644df2079c9308d72f94f4cd9058bc17abf6ce /lib/net/jao-notmuch.el
parenta8906bf653834e27c2bbd618b17b4ee3a1d996b6 (diff)
downloadelibs-0322499c46a78c63ae25ac4da9c790bc1fdc0915.tar.gz
elibs-0322499c46a78c63ae25ac4da9c790bc1fdc0915.tar.bz2
nits
Diffstat (limited to 'lib/net/jao-notmuch.el')
-rw-r--r--lib/net/jao-notmuch.el11
1 files changed, 8 insertions, 3 deletions
diff --git a/lib/net/jao-notmuch.el b/lib/net/jao-notmuch.el
index 0809d7b..db23bc1 100644
--- a/lib/net/jao-notmuch.el
+++ b/lib/net/jao-notmuch.el
@@ -402,7 +402,8 @@
(tb (seq-find (lambda (b)
(with-current-buffer b
(and (derived-mode-p 'notmuch-tree-mode) b)))
- (buffer-list))))
+ (buffer-list)))
+ (subject (propertize subject 'face 'message-header-subject)))
`((:eval
(jao-notmuch--format-header-line ,(buffer-name tb) ,cb ,subject)))
(concat " " subject)))
@@ -545,11 +546,15 @@
(t " "))))
(provide 'jao-notmuch)
+
;;; bars
+(defvar jao-notmuch-bar-max 188)
+
(defun jao-notmuch-hbar (margin)
- (widget-insert (propertize (make-string (- (window-width) margin) ?—)
- 'face '(:foreground "grey80")))
+ (let ((w (- (min (window-width) jao-notmuch-bar-max) margin)))
+ (widget-insert (propertize (make-string w ?—) 'face '(:foreground "grey80"))))
(newline))
+
;;; org links
(defun jao-notmuch-id-file-name (id)
(let ((cmd (format "notmuch search --output=files id:%s" id)))