From: Kenichi Handa Date: Fri, 26 Sep 1997 01:50:55 +0000 (+0000) Subject: (nnmail-find-file): Bind X-Git-Tag: emacs-20.3~3085 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b784063f3638332dbecbba542f8d1185de6ef823;p=emacs.git (nnmail-find-file): Bind file-name-coding-system to binary. (nnmail-write-region): Likewise. --- diff --git a/lisp/gnus/nnmail.el b/lisp/gnus/nnmail.el index 295e2f2b3ac..a3ed26c45c0 100644 --- a/lisp/gnus/nnmail.el +++ b/lisp/gnus/nnmail.el @@ -488,8 +488,8 @@ parameter. It should return nil, `warn' or `delete'." ;; 1997/5/4 by MORIOKA Tomohiko (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 @@ If ARGS, PROMPT is used as an argument to `format'." ;; 1997/5/4 by MORIOKA Tomohiko (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)))