[popfile-commit] engine/Proxy POP3.pm,1.53,1.54 Proxy.pm,1.13,1.14

[<jgr...@us...>]

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 "";
!         }
      }