1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00

(pop3-open-server): Bind coding-system-for-read and ...-for-write.

This commit is contained in:
Richard M. Stallman 1998-10-12 23:15:16 +00:00
parent b80d5655b0
commit c03adfbdf1

View File

@ -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))