From: ichikawa <ichikawa>
Date: Sun, 30 Aug 1998 15:51:46 +0000 (+0000)
Subject: Fix typo
X-Git-Tag: pgnus-ichikawa-199811302358~241
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1ef11a5c8e4b75c2bf6be6b5293ea6ca765547ca;p=elisp%2Fgnus.git-

Fix typo
---

diff --git a/lisp/message.el b/lisp/message.el
index c1438d3..213f25c 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2195,7 +2195,8 @@ the user from the mailer."
       (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
@@ -2397,7 +2398,8 @@ to find out how to use this."
       (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)