use Test::More tests => 3;
# Load test utils
unshift( @INC, "." );
unshift( @INC, "t" );
require_ok( "p4test" );
my $test = new P4::Test;
ok( defined( $test ) );
if( defined $ENV{ 'KEEPTESTS' } )
{
ok( 1 );
}
else
{
ok( $test->CleanupTestTree() );
}
| # | Change | User | Description | Committed | |
|---|---|---|---|---|---|
| #1 | 7615 | Robert Cowham | Bring to main | ||
| //guest/robert_cowham/perforce/API/p4perl/p4perl-2007.3/t/99-cleanup.t | |||||
| #1 | 7614 | Robert Cowham | P4Perl 2007.3 | ||