diff options
| author | Richard M. Stallman | 1998-10-12 23:15:16 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1998-10-12 23:15:16 +0000 |
| commit | c03adfbdf1d0a9fc63e395e3380fade6fba9751e (patch) | |
| tree | 2764302a64359acfdf332f9633ea21775780d41d | |
| parent | b80d5655b016f15aaddb231ac75bfb18f0ac96dd (diff) | |
| download | emacs-c03adfbdf1d0a9fc63e395e3380fade6fba9751e.tar.gz emacs-c03adfbdf1d0a9fc63e395e3380fade6fba9751e.zip | |
(pop3-open-server): Bind coding-system-for-read and ...-for-write.
| -rw-r--r-- | lisp/gnus/pop3.el | 4 |
1 files 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." | |||
| 110 | (let ((process-buffer | 110 | (let ((process-buffer |
| 111 | (get-buffer-create (format "trace of POP session to %s" mailhost))) | 111 | (get-buffer-create (format "trace of POP session to %s" mailhost))) |
| 112 | (process) | 112 | (process) |
| 113 | (process-coding-system-alist | 113 | (coding-system-for-read 'no-conversion) |
| 114 | (cons '("POP" . nil) process-coding-system-alist))) | 114 | (coding-system-for-write 'no-conversion)) |
| 115 | (save-excursion | 115 | (save-excursion |
| 116 | (set-buffer process-buffer) | 116 | (set-buffer process-buffer) |
| 117 | (erase-buffer)) | 117 | (erase-buffer)) |