X-Git-Url: https://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fpop3.el;h=327c52974925463d1bd7a4f403c9bd0aca0cbaf0;hb=7ad80d3719e53fc5e4c2c337c84f91c08ff7a2d1;hp=20fe5609150db843254dbb2ba1168cdf2f92a90e;hpb=57565636ecae0afad6700679b6fcf50f0974b4a8;p=gnus diff --git a/lisp/pop3.el b/lisp/pop3.el index 20fe56091..327c52974 100644 --- a/lisp/pop3.el +++ b/lisp/pop3.el @@ -149,7 +149,7 @@ Use streaming commands." (let ((size (pop3-stat process))) (setq message-count (car size) message-total-size (cadr size))) - (when (plusp message-count) + (when (> message-count 0) (pop3-send-streaming-command process "RETR" message-count message-total-size) (pop3-write-to-file file)