Relax parsing of continuation requests for for empty resp-text.

microsoft's IMAP server violates RFC 3501 by skipping the trailing space
for empty resp-text.

diff --git a/lib/Net/IMAP/InterIMAP.pm b/lib/Net/IMAP/InterIMAP.pm
index 0405794ac725943b0e2b130ac1ce44e23e87dc50..745e64fe1c2b89e5fd3197e1abc3d20be998bd03 100644 (file)
--- a/lib/Net/IMAP/InterIMAP.pm
+++ b/lib/Net/IMAP/InterIMAP.pm
@@ -2249,7 +2249,8 @@ sub _resp($$;$$$) {
             }
         }
     }
-    elsif (s/\A\+ //) {
+    elsif (s/\A\+// and ($_ eq '' or s/\A //)) {
+        # microsoft's IMAP server violates RFC 3501 by skipping the trailing ' ' for empty resp-text
         if (defined $callback and $cmd eq 'AUTHENTICATE') {
             my $x = $callback->($_);
             $self->_cmd_extend(\$x);