(mime-edit-translate-header): Use `mime-encode-header-in-buffer'

instead of `eword-encode-header'.
(mime-edit-encrypt-pgp-mime): Likewise.
(mime-edit-translate-single-part-tag): Likewise.

diff --git a/mime-edit.el b/mime-edit.el
index d6899a3..70b7078 100644 (file)
--- a/mime-edit.el
+++ b/mime-edit.el
@@ -1648,9 +1648,8 @@ Parameter must be '(PROMPT CHOICE1 (CHOISE2 ...))."
 
 (defun mime-edit-translate-header ()
   "Encode the message header into network representation."
-  (eword-encode-header 'code-conversion)
-  (run-hooks 'mime-edit-translate-header-hook)
-  )
+  (mime-encode-header-in-buffer 'code-conversion)
+  (run-hooks 'mime-edit-translate-header-hook))
 
 (defun mime-edit-translate-buffer ()
   "Encode the tagged MIME message in current buffer in MIME compliant message."
@@ -1874,7 +1873,7 @@ Content-Transfer-Encoding: 7bit
               (insert (format "Content-Transfer-Encoding: %s\n" encoding))
             )
           (insert "\n")
-         (eword-encode-header)
+         (mime-encode-header-in-buffer)
          (or (let ((pgg-default-user-id 
                     (or mime-edit-pgp-user-id
                         (if from 
@@ -2122,8 +2121,7 @@ Content-Description: S/MIME Encrypted Message][base64]]\n")
            (insert "Content-Type: " contype "\n")
            (if encoding
                (insert "Content-Transfer-Encoding: " encoding "\n"))
-           (eword-encode-header)
-           )
+           (mime-encode-header-in-buffer))
          (cons (and contype
                     (downcase contype))
                (and encoding