intro: "SJ" == Simon Josefsson <jas(a)extundo.com> writes:
SJ> On 18 Mar 2002, Nickolay Pakoulin wrote:
AA> Signaling: (quit) accept-process-output(#<network connection
"POP<1>"
AA> ("pop3" . "pop.t-online.com") state:run>)
AA> pop3-read-response(#<network connection "POP<1>"
("pop3"
AA> . "pop.t-online.com") state:run> t)
AA> pop3-open-server("pop.t-online.com" "pop3")
> I attached the patch below that makes pop3.el work. Still it
seems
> VERY suspicios to me. I changed search patterns but the real fix
> should deal with coding systems IMHO.
SJ> This is the obvious fix, yes, but I think it is the wrong one. pop3
SJ> should disable EOL magic instead, and match on \r\n. I thought
SJ> setting the read/write coding system to binary would be enough, but
SJ> apparently it isn't.
The solution is to set coding system for the process:
--- mail-lib/pop3.el Fri Oct 6 13:40:48 2000
+++ /c/Program Files/XEmacs/xemacs-packages/lisp/mail-lib/pop3.el Mon Mar 18 15:12:22
2002
@@ -248,6 +248,7 @@
(erase-buffer))
(setq process
(open-network-stream "POP" process-buffer mailhost port))
+ (set-process-input-coding-system process 'binary)
(setq pop3-read-point (point-min))
(let ((response (pop3-read-response process t)))
(setq pop3-timestamp