Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1:/tmp/cvs-serv19023/Proxy
Modified Files:
POP3.pm Proxy.pm
Log Message:
Prevent warning when bar chart is empty; fix incorrect references to old get_response method; make subject modification protection work with reconfigured subjects
Index: POP3.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/POP3.pm,v
retrieving revision 1.53
retrieving revision 1.54
diff -C2 -d -r1.53 -r1.54
*** POP3.pm 26 Apr 2003 10:07:51 -0000 1.53
--- POP3.pm 7 May 2003 22:21:01 -0000 1.54
***************
*** 180,184 ****
# Loop until we get -ERR or +OK
my $response;
! $response = get_response( $self, $mail, $client, $command );
while ( ( ! ( $response =~ /\+OK/ ) ) && ( ! ( $response =~ /-ERR/ ) ) ) {
--- 180,184 ----
# Loop until we get -ERR or +OK
my $response;
! $response = $self->get_response_( $mail, $client, $command );
while ( ( ! ( $response =~ /\+OK/ ) ) && ( ! ( $response =~ /-ERR/ ) ) ) {
***************
*** 191,195 ****
$auth = <$client>;
$auth =~ s/(\015|\012)$//g;
! $response = get_response( $self, $mail, $client, $auth );
}
} else {
--- 191,195 ----
$auth = <$client>;
$auth =~ s/(\015|\012)$//g;
! $response = $self->get_response_( $mail, $client, $auth );
}
} else {
Index: Proxy.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/Proxy.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -d -r1.13 -r1.14
*** Proxy.pm 15 Apr 2003 07:31:01 -0000 1.13
--- Proxy.pm 7 May 2003 22:21:01 -0000 1.14
***************
*** 463,467 ****
}
}
!
if (!$null_resp) {
# An error has occurred reading from the mail server
--- 463,467 ----
}
}
!
if (!$null_resp) {
# An error has occurred reading from the mail server
***************
*** 471,475 ****
$self->tee_($client, "");
return "";
! }
}
--- 471,475 ----
$self->tee_($client, "");
return "";
! }
}
|
