notmuch.el: Fix to hide citations in body of read messages.

Previously, unhinding a read message would still show all the citations
in that message without an explicit command to make them visible. Fix.
This commit is contained in:
Carl Worth 2009-11-04 08:38:49 -08:00
parent 446459a5ea
commit c8382b2f0e

View file

@ -198,10 +198,10 @@ simply move to the beginning of the current message."
(let ((beg (point)))
(re-search-forward notmuch-show-body-end-regexp)
(let ((end (match-beginning 0)))
(notmuch-show-markup-citations-region beg end)
(if (not (member "unread" (notmuch-show-get-tags)))
(overlay-put (make-overlay beg end)
'invisible 'notmuch-show-body-read))
(notmuch-show-markup-citations-region beg end))))
'invisible 'notmuch-show-body-read)))))
(defun notmuch-show-markup-header ()
(re-search-forward notmuch-show-header-begin-regexp)