X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mime-play.el;fp=mime-play.el;h=1310df2132898fd913f6438ffb794b103832ae79;hb=d31ec19e13bc38aba1f88357de7a10b1243433d2;hp=3d060a58b88d3781cd7cebbbab5064a299215d86;hpb=d46e72e9a54423fa8ecfcc553e0c904695bdceb4;p=elisp%2Fsemi.git

diff --git a/mime-play.el b/mime-play.el
index 3d060a5..1310df2 100644
--- a/mime-play.el
+++ b/mime-play.el
@@ -330,12 +330,12 @@ It is registered to variable `mime-preview-quitting-method-alist'."
   "Write current region into specified file.
 When called from a program, takes three arguments:
 START, END and FILENAME.  START and END are buffer positions.
-It refer `mime-raw-coding-system-alist' to choose coding-system to
-write."
+It refer `mime-raw-buffer-coding-system-alist' to choose coding-system
+to write."
   (let ((coding-system-for-write
 	 (cdr
-	  (or (assq major-mode mime-raw-coding-system-alist)
-	      (assq t mime-raw-coding-system-alist)
+	  (or (assq major-mode mime-raw-buffer-coding-system-alist)
+	      (assq t mime-raw-buffer-coding-system-alist)
 	      ))))
     (write-region start end filename)
     ))