- ;; If we're making the message visible then the visibility of
- ;; the constituent elements depends on their own properties, not
- ;; that of the message as a whole.
- (let ((headers-visible (plist-get props :headers-visible))
- (body-visible (plist-get props :body-visible)))
+ ;; When making the message visible, the headers may or not be
+ ;; visible. So we check that property separately.
+ (let ((headers-visible (plist-get props :headers-visible)))