(let ((message-deletable-headers
(if news nil message-deletable-headers)))
(message-generate-headers message-required-mail-headers))
- (mm-encode-message-header)
+ (if (featurep 'mm-encode)
+ (mm-encode-message-header))
;; Let the user do all of the above.
(run-hooks 'message-header-hook))
(unwind-protect
(message-narrow-to-headers)
;; Insert some headers.
(message-generate-headers message-required-news-headers)
- (mm-encode-message-header)
+ (if (featurep 'mm-encode)
+ (mm-encode-message-header))
;; Let the user do all of the above.
(run-hooks 'message-header-hook))
(message-cleanup-headers)