[popfile-commit] engine/Test SimpleProxy.pm,1.7,1.8

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

Update of /cvsroot/popfile/engine/Test
In directory sc8-pr-cvs1:/tmp/cvs-serv15772/Test

Modified Files:
	SimpleProxy.pm 
Log Message:
Remove all tabs from the source code and fix my editor so that *I* don't introduce any more

Index: SimpleProxy.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Test/SimpleProxy.pm,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** SimpleProxy.pm	26 Jul 2003 17:14:43 -0000	1.7
--- SimpleProxy.pm	26 Jul 2003 18:28:28 -0000	1.8
***************
*** 110,114 ****
              $self->tee_( $handle, "$1$eol" );
              select( undef, undef, undef, 0.1 );
! 	}
  
          # If there's data available to read then read it into the received
--- 110,114 ----
              $self->tee_( $handle, "$1$eol" );
              select( undef, undef, undef, 0.1 );
!         }
  
          # If there's data available to read then read it into the received
***************
*** 118,123 ****
              if ( defined( $line ) ) {
                  $self->{received__} .= $line;
! 	    }
! 	}
      } else {
          $self->log_( "service_server: remote client is not connected" );
--- 118,123 ----
              if ( defined( $line ) ) {
                  $self->{received__} .= $line;
!             }
!         }
      } else {
          $self->log_( "service_server: remote client is not connected" );
***************
*** 131,136 ****
                  $self->tee_( $handle, "To The Jungle$eol" );
  
! 	    }
! 	}
      }
  }
--- 131,136 ----
                  $self->tee_( $handle, "To The Jungle$eol" );
  
!             }
!         }
      }
  }
***************
*** 173,179 ****
              my $line = <$remote>;
              if ( defined( $line ) ) {
! 	        last if ( $line =~ /__POPFILE__ABORT__CHILD__/ );
                  print $client $line;
! 	    } else {
                  last;
              }
--- 173,179 ----
              my $line = <$remote>;
              if ( defined( $line ) ) {
!                 last if ( $line =~ /__POPFILE__ABORT__CHILD__/ );
                  print $client $line;
!             } else {
                  last;
              }