summaryrefslogtreecommitdiff
path: root/lisp/gnus/nnfolder.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1997-09-26 01:50:55 +0000
committerKenichi Handa <handa@m17n.org>1997-09-26 01:50:55 +0000
commitddcfd8dee9387d740a01dde32808fb6e69d06e08 (patch)
tree94e577fe8b5cf8a0b7310a7dab3a4353c3620cdf /lisp/gnus/nnfolder.el
parent80bb5a78a57410eb24c8a3236a413a944b2d61c0 (diff)
downloademacs-ddcfd8dee9387d740a01dde32808fb6e69d06e08.tar.gz
(nnfolder-request-list): Bind
file-name-coding-system to binary. (nnfolder-possibly-change-group): Likewise.
Diffstat (limited to 'lisp/gnus/nnfolder.el')
-rw-r--r--lisp/gnus/nnfolder.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/nnfolder.el b/lisp/gnus/nnfolder.el
index d4fea3e0510..c7f9a720ff2 100644
--- a/lisp/gnus/nnfolder.el
+++ b/lisp/gnus/nnfolder.el
@@ -286,6 +286,7 @@ time saver for large mailboxes.")
;; 1997/8/14 by MORIOKA Tomohiko
;; for XEmacs/mule.
(let ((nnmail-file-coding-system nnmail-active-file-coding-system)
+ (file-name-coding-system 'binary) ; for Emacs 20
(pathname-coding-system 'binary)) ; for XEmacs/mule
(nnmail-find-file nnfolder-active-file)
(setq nnfolder-group-alist (nnmail-get-active)))
@@ -509,7 +510,8 @@ time saver for large mailboxes.")
;; Change group.
(when (and group
(not (equal group nnfolder-current-group)))
- (let ((pathname-coding-system 'binary))
+ (let ((file-name-coding-system 'binary)
+ (pathname-coding-system 'binary))
(nnmail-activate 'nnfolder)
(when (and (not (assoc group nnfolder-group-alist))
(not (file-exists-p