X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=emh-comp.el;h=a326f1f3744b5123cd39b4c8ce401664ad3a279b;hb=ea2380d18616f67e8897a2ac0a9e5214d6e5dacb;hp=9519c3137e2491bf0c740d6a511d4f350ceb1a4d;hpb=3fe4fddc7c6259fdfba8d1942936616f4a9fa831;p=elisp%2Femh.git

diff --git a/emh-comp.el b/emh-comp.el
index 9519c31..a326f1f 100644
--- a/emh-comp.el
+++ b/emh-comp.el
@@ -241,7 +241,7 @@ See also documentation for `\\[mh-send]' function."
 			 (as-binary-input-file
 			  (mh-read-draft "clean-up"
 					 (mh-msg-filename msg) nil))
-		       (setq enable-multibyte-characters flag)
+		       (set-buffer-multibyte flag)
 		       ))
 		   ))))
       (goto-char (point-min))
@@ -441,8 +441,8 @@ then prompt for the message sequence. See also documentation for
 (defun emh-yank-cur-msg-with-no-filter ()
   "Insert the current message into the draft buffer.
 This function makes new show-buffer from article-buffer to disable
-variable `mime-view-plain-text-preview-hook'. If you don't want to
-use text filters for replying message, please set it to
+variable `mime-preview-text/plain-hook'. If you don't want to use text
+filters for replying message, please set it to
 `emh-message-yank-function'.
 Prefix each non-blank line in the message with the string in
 `mh-ins-buf-prefix'. The entire message will be inserted if
@@ -460,7 +460,7 @@ yanked message will be deleted."
 	(set-buffer mh-show-buffer)	; Find displayed message
 	(let ((mh-ins-str
 	       (if mime-raw-buffer
-		   (let (mime-view-plain-text-preview-hook buf)
+		   (let (mime-display-text/plain-hook buf)
 		     (prog1
 			 (save-window-excursion
 			   (set-buffer mime-raw-buffer)