equal
deleted
inserted
replaced
|
1 diff --git a/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm b/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm |
|
2 --- a/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm |
|
3 +++ b/hs12/isync/Mail-IMAPClient-3.24/lib/Mail/IMAPClient.pm |
|
4 @@ -1192,8 +1192,8 @@ |
|
5 |
|
6 my $popped; |
|
7 $popped = pop @$ref # (-: vi |
|
8 - until ( $popped && $popped =~ /\)$CRLF$/o ) # (-: vi |
|
9 - || !grep /\)$CRLF$/o, @$ref; |
|
10 + until ( $popped && $popped =~ /^\)$CRLF$/o ) # (-: vi |
|
11 + || !grep /^\)$CRLF$/o, @$ref; |
|
12 |
|
13 if ( $head =~ /BODY\[TEXT\]\s*$/i ) { # Next line is a literal |
|
14 $string .= shift @$ref while @$ref; |