(pop3-open-server): Set process-coding-system-alist around open-network-stream.
This commit is contained in:
parent
55d8d76935
commit
cebe85e9df
1 changed files with 3 additions and 1 deletions
|
@ -109,7 +109,9 @@ Used for APOP authentication.")
|
|||
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))
|
||||
|
|
Loading…
Add table
Reference in a new issue