X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fpop3.el;h=d2953dcffc922e3e0e73fd6c3f955e119a5beb33;hb=6d7b29856941c186ec54e3b8a05d4a10566e3582;hp=950cae25c4e9e996dfa1823dd603e9947ca5233b;hpb=914b347a6d584c68c6c652a41c5538ad678f339e;p=gnus diff --git a/lisp/pop3.el b/lisp/pop3.el index 950cae25c..d2953dcff 100644 --- a/lisp/pop3.el +++ b/lisp/pop3.el @@ -520,8 +520,7 @@ Otherwise, return the size of the message-id MSG" (mapcar #'(lambda (s) (let ((split (split-string s " "))) (cons (string-to-number (nth 0 split)) (string-to-number (nth 1 split))))) - (delete "" (split-string (buffer-substring start end) - "\r\n")))))))) + (split-string (buffer-substring start end) "\r\n" t))))))) (defun pop3-retr (process msg crashbuf) "Retrieve message-id MSG to buffer CRASHBUF."