+ (notmuch-show-create-part-overlays msg beg (point) hide)
+ ;; Record part information. Since we already inserted subparts,
+ ;; don't override existing :notmuch-part properties.
+ (notmuch-map-text-property beg (point) :notmuch-part
+ (lambda (v) (or v part)))
+ ;; Make :notmuch-part front sticky and rear non-sticky so it stays
+ ;; applied to the beginning of each line when we indent the message.
+ (notmuch-map-text-property beg (point) 'front-sticky
+ (lambda (v) (pushnew :notmuch-part v)))
+ (notmuch-map-text-property beg (point) 'rear-nonsticky
+ (lambda (v) (pushnew :notmuch-part v)))))