diff options
| -rw-r--r-- | lisp/gnus/pop3.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/pop3.el b/lisp/gnus/pop3.el index 4b10f782e3f..27189bf3725 100644 --- a/lisp/gnus/pop3.el +++ b/lisp/gnus/pop3.el | |||
| @@ -109,7 +109,9 @@ Used for APOP authentication.") | |||
| 109 | Returns the process associated with the connection." | 109 | 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 | ||
| 114 | (cons '("POP" . nil) process-coding-system-alist))) | ||
| 113 | (save-excursion | 115 | (save-excursion |
| 114 | (set-buffer process-buffer) | 116 | (set-buffer process-buffer) |
| 115 | (erase-buffer)) | 117 | (erase-buffer)) |