(overlay-put overlay 'invisible 'notmuch-show-citation)
(overlay-put overlay 'before-string
(concat "[" (number-to-string (count-lines beg-sub (point)))
(overlay-put overlay 'invisible 'notmuch-show-citation)
(overlay-put overlay 'before-string
(concat "[" (number-to-string (count-lines beg-sub (point)))
(if (looking-at "--[ ]?$")
(let ((sig-lines (count-lines beg-sub end)))
(if (<= sig-lines notmuch-show-signature-lines-max)
(if (looking-at "--[ ]?$")
(let ((sig-lines (count-lines beg-sub end)))
(if (<= sig-lines notmuch-show-signature-lines-max)