From c03adfbdf1d0a9fc63e395e3380fade6fba9751e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 12 Oct 1998 23:15:16 +0000 Subject: [PATCH] (pop3-open-server): Bind coding-system-for-read and ...-for-write. --- lisp/gnus/pop3.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index 27189bf3725..ce1390f02e7 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el @@ -110,8 +110,8 @@ Returns the process associated with the connection." (let ((process-buffer (get-buffer-create (format "trace of POP session to %s" mailhost))) (process) - (process-coding-system-alist - (cons '("POP" . nil) process-coding-system-alist))) + (coding-system-for-read 'no-conversion) + (coding-system-for-write 'no-conversion)) (save-excursion (set-buffer process-buffer) (erase-buffer)) -- 2.39.2