changeset 19988:189ed9f676c9

(nnmail-find-file): Bind file-name-coding-system to binary. (nnmail-write-region): Likewise.
author Kenichi Handa <handa@m17n.org>
date Fri, 26 Sep 1997 01:50:55 +0000
parents 470e157b3e8a
children 9049c6de031f
files lisp/gnus/nnmail.el
diffstat 1 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/nnmail.el	Thu Sep 25 12:40:02 1997 +0000
+++ b/lisp/gnus/nnmail.el	Fri Sep 26 01:50:55 1997 +0000
@@ -488,8 +488,8 @@
 	;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp>
 	(let ((coding-system-for-read nnmail-file-coding-system)
 	      ;; 1997/8/12 by MORIOKA Tomohiko
-	      ;;	for XEmacs/mule.
-	      (pathname-coding-system 'binary))
+	      (file-name-coding-system 'binary) ; for Emacs 20
+	      (pathname-coding-system 'binary)) ; for XEmacs/mule
 	  (insert-file-contents file)
 	  t)
       (file-error nil))))
@@ -1650,8 +1650,8 @@
   ;; 1997/5/4 by MORIOKA Tomohiko <morioka@jaist.ac.jp>
   (let ((coding-system-for-write nnmail-file-coding-system)
 	;; 1997/8/12 by MORIOKA Tomohiko
-	;;	for XEmacs/mule.
-	(pathname-coding-system 'binary))
+	(file-name-coding-system 'binary) ; for Emacs 20
+	(pathname-coding-system 'binary)) ; for XEmacs/mule
     (write-region start end filename append visit lockname)
     (set-file-modes filename nnmail-default-file-modes)))