Mercurial > emacs

changeset 23403:789be3d7ef2d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(pop3-open-server): Set process-coding-system-alist around open-network-stream.
author Richard M. Stallman <rms@gnu.org>
date Thu, 08 Oct 1998 09:58:00 +0000
parents 6905813a49c6
children 529689c4a32c
files lisp/gnus/pop3.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/pop3.el	Thu Oct 08 06:48:42 1998 +0000
+++ b/lisp/gnus/pop3.el	Thu Oct 08 09:58:00 1998 +0000
@@ -109,7 +109,9 @@
 Returns the process associated with the connection."
   (let ((process-buffer
 	 (get-buffer-create (format "trace of POP session to %s" mailhost)))
-	(process))
+	(process)
+	(process-coding-system-alist
+	 (cons '("POP" . nil) process-coding-system-alist)))
     (save-excursion
       (set-buffer process-buffer)
       (erase-buffer))