From 00c0896c9b9369ec2a844cea4d841be7d4485220 Mon Sep 17 00:00:00 2001 From: Alexander Botero-Lowry Date: Fri, 20 Nov 2009 00:06:17 -0800 Subject: [PATCH] make header names bold in show-mode --- notmuch.el | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/notmuch.el b/notmuch.el index 763c85ff..70dbe5ba 100644 --- a/notmuch.el +++ b/notmuch.el @@ -593,6 +593,14 @@ which this thread was originally shown." (re-search-forward notmuch-show-header-end-regexp) (beginning-of-line) (let ((end (point-marker))) + (goto-char beg) + (forward-line) + (while (looking-at "[A-Za-z][-A-Za-z0-9]*:") + (beginning-of-line) + (overlay-put (make-overlay (point) (re-search-forward ":")) + 'face 'bold) + (forward-line) + ) (indent-rigidly beg end depth) (overlay-put (make-overlay beg-hidden end) 'invisible 'notmuch-show-header) -- 2.43.0