X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=install%2F5.005%2FDBD-Pg-1.22-fixvercmp%2Ft%2F01connect.t;fp=install%2F5.005%2FDBD-Pg-1.22-fixvercmp%2Ft%2F01connect.t;h=0000000000000000000000000000000000000000;hp=be17b5087240d44ce34f264b6020ac26780db2c7;hb=3a9c534d55e1736545ef8037e1391101c7a11f2b;hpb=7a67b0df697c1aa35e148bd5b2f1f765bf1969f6 diff --git a/install/5.005/DBD-Pg-1.22-fixvercmp/t/01connect.t b/install/5.005/DBD-Pg-1.22-fixvercmp/t/01connect.t deleted file mode 100644 index be17b5087..000000000 --- a/install/5.005/DBD-Pg-1.22-fixvercmp/t/01connect.t +++ /dev/null @@ -1,26 +0,0 @@ -use strict; -use DBI; -use Test::More; - -if (defined $ENV{DBI_DSN}) { - plan tests => 2; -} else { - plan skip_all => 'cannot test without DB info'; -} - -my $dbh = DBI->connect($ENV{DBI_DSN}, $ENV{DBI_USER}, $ENV{DBI_PASS}, - {RaiseError => 1, AutoCommit => 0} - ); - -ok((defined $dbh and $dbh->disconnect()), - 'connect with transaction' - ); - -undef $dbh; -$dbh = DBI->connect($ENV{DBI_DSN}, $ENV{DBI_USER}, $ENV{DBI_PASS}, - {RaiseError => 1, AutoCommit => 1}); - -ok((defined $dbh and $dbh->disconnect()), - 'connect without transaction' - ); -