use Test::More tests => 7;
BEGIN { use_ok( 'P4' ); }
# Load test utils
unshift( @INC, "." );
unshift( @INC, "t" );
require_ok( "p4test" );
my $test = P4::Test->new();
ok( defined( $test ) );
my $p4 = $test->InitClient();
ok( defined( $p4 ) );
ok( !$p4->IsConnected() );
ok( $p4->Connect() );
ok( $p4->IsConnected() );
| # | Change | User | Description | Committed | |
|---|---|---|---|---|---|
| #2 | 19592 | jmash | Convert uses of indirect object construction syntax to use direct syntax in the test modules. | ||
| #1 | 19582 | jmash | Initial fork of P4Perl. | ||
| //guest/perforce_software/p4perl/main/t/04-connect.t | |||||
| #1 | 15920 | Matt Attaway | Move p4perl files into the main directory | ||
| //guest/perforce_software/p4perl/t/04-connect.t | |||||
| #1 | 8486 | Paul Allen |
Initial population of P4PERL from: //depot/main/p4-perl/...@565514 //depot/main/p4-doc/user/p4perlnotes.txt@565514 |
||