Update of /cvsroot/popfile/engine/Services/IMAP
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7442/Services/IMAP
Modified Files:
Tag: b0_22_2
Client.pm
Log Message:
Adapt fetch_message_part to gmails broken imap implementation.
Index: Client.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Services/IMAP/Attic/Client.pm,v
retrieving revision 1.1.2.1
retrieving revision 1.1.2.2
diff -C2 -d -r1.1.2.1 -r1.1.2.2
*** Client.pm 11 Nov 2007 16:42:55 -0000 1.1.2.1
--- Client.pm 20 Nov 2007 14:25:14 -0000 1.1.2.2
***************
*** 814,818 ****
# trailing and leading newlines and thus omit complete lines.
! while ( $message =~ m/(.*?$eol)/g ) {
push @lines, $1;
}
--- 814,818 ----
# trailing and leading newlines and thus omit complete lines.
! while ( $message =~ m/(.*?(?:$eol|\012|\015))/g ) {
push @lines, $1;
}
***************
*** 820,824 ****
# No number of octets: fall back, but issue a warning
else {
! while ( $last_response =~ m/(.*?$eol)/g ) {
push @lines, $1;
}
--- 820,824 ----
# No number of octets: fall back, but issue a warning
else {
! while ( $last_response =~ m/(.*?(?:$eol|\012|\015))/g ) {
push @lines, $1;
}
|
