X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=notmuch.el;h=ef2a72a82e6f874a90a1836099db090817927624;hp=763c85fffe7971cdf011299315274e7072db6bea;hb=5aea0dcb61368b416b2243e7cdf3bab8d919b696;hpb=b38bd7efd83a8b7ea2c961060d8007efa055b9b6 diff --git a/notmuch.el b/notmuch.el index 763c85ff..ef2a72a8 100644 --- a/notmuch.el +++ b/notmuch.el @@ -483,7 +483,8 @@ which this thread was originally shown." (remove-from-invisibility-spec invis-spec) (add-to-invisibility-spec invis-spec) )) - (goto-char (button-end cite-button))) + (force-window-update) + (redisplay t)) (defun notmuch-show-markup-citations-region (beg end depth) (goto-char beg) @@ -593,9 +594,19 @@ 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) + (goto-char end) + (insert "\n") (set-marker beg nil) (set-marker beg-hidden nil) (set-marker end nil)