Handle un-expected IMAP end of file

diff --git a/mailboxes/folders-lib.pl b/mailboxes/folders-lib.pl
index 104f4d3..f36c1e8 100755 (executable)
--- a/mailboxes/folders-lib.pl
+++ b/mailboxes/folders-lib.pl
@@ -2000,7 +2000,7 @@ while(1) {
                        while($got < $size) {
                                local $buf;
                                local $r = read($h, $buf, $size-$got);
-                               return (0, [ $err ], $err, $err) if ($r < 0);
+                               return (0, [ $err ], $err, $err) if ($r <= 0);
                                $rv[$#rv] .= $buf;
                                $got += $r;
                                }