use Test::More tests => 2; # Load test utils unshift( @INC, "." ); unshift( @INC, "t" ); require_ok( "p4test" ); my $test = new P4::Test(); $test->CreateTestTree(); ok( -d $test->ServerRoot() );
# | Change | User | Description | Committed | |
---|---|---|---|---|---|
#1 | 7615 | Robert Cowham | Bring to main | ||
//guest/robert_cowham/perforce/API/p4perl/p4perl-2007.3/t/02-setup.t | |||||
#1 | 7614 | Robert Cowham | P4Perl 2007.3 |