Off-by-one error on the request loop (for debugging purposes) removed.

diff --git a/lisp/pop3.el b/lisp/pop3.el
index 3d992cc..ed311aa 100644 (file)
--- a/lisp/pop3.el
+++ b/lisp/pop3.el
@@ -150,7 +150,7 @@ Use streaming commands."
 (defun pop3-send-streaming-command (process command count total-size)
   (erase-buffer)
   (let ((i 1))
-    (while (>= (1+ count) i)
+    (while (>= count i)
       (process-send-string process (format "%s %d\r\n" command i))
       ;; Only do 100 messages at a time to avoid pipe stalls.
       (when (zerop (% i 100))