From: tomo Date: Thu, 19 Aug 1999 05:00:18 +0000 (+0000) Subject: (mime-setup-decode-message-header): Use `mime-decode-header-in-buffer' X-Git-Tag: tm-8_1~21 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=50d9bb971ef140681542cd17befe46e0f79dafcd;p=elisp%2Ftm.git (mime-setup-decode-message-header): Use `mime-decode-header-in-buffer' instead of `mime/decode-message-header'. (mu-cite/pre-cite-hook): Likewise. (mail-setup-hook): Likewise. (message-header-hook): Use `eword-encode-header' instead of `mime/encode-message-header'. --- diff --git a/mime-setup.el.in b/mime-setup.el.in index c12bc6f..818e58d 100644 --- a/mime-setup.el.in +++ b/mime-setup.el.in @@ -30,7 +30,7 @@ (autoload 'mime/editor-mode "tm-edit" "Minor mode for editing MIME message." t) -(autoload 'mime/decode-message-header "tm-ew-d" +(autoload 'mime-decode-header-in-buffer "eword-decode" "Decode MIME encoded-words in message header." t) (defun mime-setup-decode-message-header () @@ -45,7 +45,7 @@ (match-beginning 0) (point-max) )) - (mime/decode-message-header) + (mime-decode-header-in-buffer) (set-buffer-modified-p nil) ))) @@ -99,13 +99,13 @@ ;;; @ for mu-cite ;;; -(add-hook 'mu-cite/pre-cite-hook 'mime/decode-message-header) +(add-hook 'mu-cite/pre-cite-hook 'mime-decode-header-in-buffer) ;;; @ for mail-mode, RMAIL and VM ;;; -(add-hook 'mail-setup-hook 'mime/decode-message-header) +(add-hook 'mail-setup-hook 'mime-decode-header-in-buffer) (add-hook 'mail-setup-hook 'mime/editor-mode 'append) (add-hook 'mail-send-hook 'mime-editor/maybe-translate) (set-alist 'mime-editor/split-message-sender-alist @@ -164,7 +164,7 @@ (add-hook 'message-setup-hook 'mime/editor-mode) (add-hook 'message-setup-hook 'message-maybe-setup-default-charset) (add-hook 'message-send-hook 'mime-editor/maybe-translate) - (add-hook 'message-header-hook 'mime/encode-message-header) + (add-hook 'message-header-hook 'eword-encode-header) (call-after-loaded 'message