X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=install%2F5.005%2FDBD-Pg-1.22-fixvercmp%2Ft%2F13pgtype.t;fp=install%2F5.005%2FDBD-Pg-1.22-fixvercmp%2Ft%2F13pgtype.t;h=0000000000000000000000000000000000000000;hp=8db819ee9a3cd7576178822c47374f8a62bc0029;hb=3a9c534d55e1736545ef8037e1391101c7a11f2b;hpb=7a67b0df697c1aa35e148bd5b2f1f765bf1969f6

diff --git a/install/5.005/DBD-Pg-1.22-fixvercmp/t/13pgtype.t b/install/5.005/DBD-Pg-1.22-fixvercmp/t/13pgtype.t
deleted file mode 100644
index 8db819ee9..000000000
--- a/install/5.005/DBD-Pg-1.22-fixvercmp/t/13pgtype.t
+++ /dev/null
@@ -1,43 +0,0 @@
-use strict;
-use DBI;
-use Test::More;
-
-if (defined $ENV{DBI_DSN}) {
-  plan tests => 3;
-} 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,
-   'connect with transaction'
-  );
-
-eval {
-  local $dbh->{PrintError} = 0;
-  $dbh->do(q{DROP TABLE tt});
-  $dbh->commit();
-};
-$dbh->rollback();
-
-$dbh->do(q{CREATE TABLE tt (blah numeric(5,2), foo text)});
-my $sth = $dbh->prepare(qq{
-			   SELECT * FROM tt WHERE FALSE
-			  });
-$sth->execute();
-
-my @types = @{$sth->{pg_type}};
-
-ok($types[0] eq 'numeric',
-   'type numeric'
-  );
-
-ok($types[1] eq 'text',
-   'type text'
-  );
-
-$sth->finish();
-$dbh->rollback();
-$dbh->disconnect();