From: Peter Rabbitson <ribasushi@cpan.org>
Date: Sun, 10 May 2009 17:57:31 +0000 (+0000)
Subject: Require DBICTest.pm in all tests even if it is not needed at all
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d81900119bbe932c7c112c022cce3d51a11979bb;p=dbsrgits%2FDBIx-Class-Historic.git

Require DBICTest.pm in all tests even if it is not needed at all
---

diff --git a/t/04dont_break_c3.t b/t/04dont_break_c3.t
index d5cb5d1..a7de9fc 100644
--- a/t/04dont_break_c3.t
+++ b/t/04dont_break_c3.t
@@ -1,11 +1,11 @@
-#!/usr/bin/perl -w
-#Simon Ilyushchenko, 12/05/05
-#Testing the case when we try to inject into @ISA a class that's already a parent of the target class.
 
 use strict;
 use Test::More tests => 2;
 use MRO::Compat;
 
+use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
+
 {
 package AAA;
 
diff --git a/t/39load_namespaces_1.t b/t/39load_namespaces_1.t
index 84ddd83..f20ca8c 100644
--- a/t/39load_namespaces_1.t
+++ b/t/39load_namespaces_1.t
@@ -4,7 +4,8 @@ use strict;
 use warnings;
 use Test::More;
 
-unshift(@INC, './t/lib');
+use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 
 plan tests => 8;
 
diff --git a/t/39load_namespaces_2.t b/t/39load_namespaces_2.t
index 6daf05f..5b31c09 100644
--- a/t/39load_namespaces_2.t
+++ b/t/39load_namespaces_2.t
@@ -4,7 +4,8 @@ use strict;
 use warnings;
 use Test::More;
 
-unshift(@INC, './t/lib');
+use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 
 plan tests => 6;
 
diff --git a/t/39load_namespaces_3.t b/t/39load_namespaces_3.t
index f48c838..f4fa386 100644
--- a/t/39load_namespaces_3.t
+++ b/t/39load_namespaces_3.t
@@ -4,7 +4,8 @@ use strict;
 use warnings;
 use Test::More;
 
-unshift(@INC, './t/lib');
+use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 
 plan tests => 7;
 
diff --git a/t/39load_namespaces_4.t b/t/39load_namespaces_4.t
index b674f30..4c7c818 100644
--- a/t/39load_namespaces_4.t
+++ b/t/39load_namespaces_4.t
@@ -4,7 +4,8 @@ use strict;
 use warnings;
 use Test::More;
 
-unshift(@INC, './t/lib');
+use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 
 plan tests => 6;
 
diff --git a/t/39load_namespaces_rt41083.t b/t/39load_namespaces_rt41083.t
index c99528b..293506b 100644
--- a/t/39load_namespaces_rt41083.t
+++ b/t/39load_namespaces_rt41083.t
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 
 use lib 't/lib';
+use DBICTest; # do not remove even though it is not used 
 use Test::More tests => 8;
 
 sub _chk_warning {
diff --git a/t/41orrible.t b/t/41orrible.t
index 660ee40..0b5e49b 100644
--- a/t/41orrible.t
+++ b/t/41orrible.t
@@ -5,6 +5,7 @@ use Test::More;
 use DBIx::Class::Storage::DBI::Oracle::WhereJoins;
 
 use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 use DBIC::SqlMakerTest;
 
 plan tests => 4;
diff --git a/t/42toplimit.t b/t/42toplimit.t
index 4fad29c..5ba13d8 100644
--- a/t/42toplimit.t
+++ b/t/42toplimit.t
@@ -3,6 +3,8 @@ use warnings;
 
 use Test::More;
 use DBIx::Class::Storage::DBI;
+use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 
 plan tests => 1;
 
diff --git a/t/94versioning.t b/t/94versioning.t
index 245d492..298e0c8 100644
--- a/t/94versioning.t
+++ b/t/94versioning.t
@@ -33,6 +33,8 @@ my $fn = {
 };
 
 use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
+
 use_ok('DBICVersionOrig');
 
 my $schema_orig = DBICVersion::Schema->connect($dsn, $user, $pass, { ignore_version => 1 });
diff --git a/t/zzzzzzz_perl_perf_bug.t b/t/zzzzzzz_perl_perf_bug.t
index 8bed2d7..3ccd4a7 100644
--- a/t/zzzzzzz_perl_perf_bug.t
+++ b/t/zzzzzzz_perl_perf_bug.t
@@ -1,8 +1,8 @@
-#!/usr/bin/perl
 use strict;
 use warnings;
 use Test::More;
 use lib qw(t/lib);
+use DBICTest; # do not remove even though it is not used
 
 # This is a rather unusual test.
 # It does not test any aspect of DBIx::Class, but instead tests the