Mail-IMAPClient-3.24.diff
changeset 0 feeeedd7fa60
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/Mail-IMAPClient-3.24.diff	Tue May 25 00:23:55 2010 +0200
@@ -0,0 +1,14 @@
+diff --git a/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm b/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm
+--- a/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm
++++ b/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm
+@@ -1192,8 +1192,8 @@
+ 
+     my $popped;
+     $popped = pop @$ref    # (-: vi
+-      until ( $popped && $popped =~ /\)$CRLF$/o )    # (-: vi
+-      || !grep /\)$CRLF$/o, @$ref;
++      until ( $popped && $popped =~ /^\)$CRLF$/o )    # (-: vi
++      || !grep /^\)$CRLF$/o, @$ref;
+ 
+     if ( $head =~ /BODY\[TEXT\]\s*$/i ) {            # Next line is a literal
+         $string .= shift @$ref while @$ref;