[dbsrgits/DBIx-Class-Schema-Loader.git] / t / 12pg_common.t

use strict;
use lib qw( . ./t );
use dbixcsl_common_tests;

my $database = $ENV{PG_NAME} || '';
my $user     = $ENV{PG_USER} || '';
my $password = $ENV{PG_PASS} || '';

my $tester = dbixcsl_common_tests->new(
    vendor      => 'Pg',
    auto_inc_pk => 'SERIAL NOT NULL PRIMARY KEY',
    dsn         => "dbi:Pg:dbname=$database",
    user        => $user,
    password    => $password,
);

if( !$database || !$user ) {
    $tester->skip_tests('You need to set the PG_NAME, PG_USER and PG_PASS environment variables');
}
else {
    $tester->run_tests();
}
Commit	Line	Data
a78e3fed	1	use strict;
a78e3fed	2	use lib qw( . ./t );
fbd83464	3	use dbixcsl_common_tests;
a78e3fed	4
	5	my $database = $ENV{PG_NAME} \|\| '';
	6	my $user = $ENV{PG_USER} \|\| '';
	7	my $password = $ENV{PG_PASS} \|\| '';
	8
fbd83464	9	my $tester = dbixcsl_common_tests->new(
a78e3fed	10	vendor => 'Pg',
	11	auto_inc_pk => 'SERIAL NOT NULL PRIMARY KEY',
	12	dsn => "dbi:Pg:dbname=$database",
	13	user => $user,
	14	password => $password,
	15	);
	16
	17	if( !$database \|\| !$user ) {
	18	$tester->skip_tests('You need to set the PG_NAME, PG_USER and PG_PASS environment variables');
	19	}
	20	else {
	21	$tester->run_tests();
	22	}