From: Justin Guenther <jguenther@cpan.org>
Date: Thu, 25 May 2006 21:17:57 +0000 (+0000)
Subject: Changed tests to use DBICTest->init_schema() instead of DBICTest::init_schema()
X-Git-Tag: v0.07002~75^2~162
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a47e123334d8bcea0d34dc9ea09738d6f3b1fd49;hp=c93ddd59cd34aec049de47a63012a7d519de2ad9;p=dbsrgits%2FDBIx-Class.git

Changed tests to use DBICTest->init_schema() instead of DBICTest::init_schema()
---

diff --git a/t/19quotes.t b/t/19quotes.t
index 1275db1..be18f2d 100644
--- a/t/19quotes.t
+++ b/t/19quotes.t
@@ -14,7 +14,7 @@ BEGIN {
 use lib qw(t/lib);
 
 use_ok('DBICTest');
-DBICTest::init_schema();
+DBICTest->init_schema();
 
 DBICTest->schema->storage->sql_maker->quote_char("'");
 DBICTest->schema->storage->sql_maker->name_sep('.');
diff --git a/t/26dumper.t b/t/26dumper.t
index 0cda954..ddb4a00 100644
--- a/t/26dumper.t
+++ b/t/26dumper.t
@@ -17,7 +17,7 @@ BEGIN {
 
 use_ok('DBICTest');
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 my $rs = $schema->resultset('CD')->search({
   'artist.name' => 'We Are Goth',
   'liner_notes.notes' => 'Kill Yourself!',
diff --git a/t/31stats.t b/t/31stats.t
index b358ef0..59aeb9e 100644
--- a/t/31stats.t
+++ b/t/31stats.t
@@ -14,7 +14,7 @@ BEGIN {
 use lib qw(t/lib);
 
 use_ok('DBICTest');
-DBICTest::init_schema();
+DBICTest->init_schema();
 
 my $cbworks = 0;
 
diff --git a/t/64db.t b/t/64db.t
index 5208614..d9c03aa 100644
--- a/t/64db.t
+++ b/t/64db.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 3;
 
diff --git a/t/65multipk.t b/t/65multipk.t
index 5cea1fd..4499b49 100644
--- a/t/65multipk.t
+++ b/t/65multipk.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 4;
 
diff --git a/t/66relationship.t b/t/66relationship.t
index 45ed343..dce68f7 100644
--- a/t/66relationship.t
+++ b/t/66relationship.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 32;
 
diff --git a/t/67pager.t b/t/67pager.t
index 85b1e8d..267927d 100644
--- a/t/67pager.t
+++ b/t/67pager.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 12;
 
diff --git a/t/68inflate.t b/t/68inflate.t
index 3906a02..b730253 100644
--- a/t/68inflate.t
+++ b/t/68inflate.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 eval { require DateTime };
 plan skip_all => "Need DateTime for inflation tests" if $@;
diff --git a/t/68inflate_has_a.t b/t/68inflate_has_a.t
index 266585a..1346ce5 100644
--- a/t/68inflate_has_a.t
+++ b/t/68inflate_has_a.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 eval { require DateTime };
 plan skip_all => "Need DateTime for inflation tests" if $@;
diff --git a/t/68inflate_serialize.t b/t/68inflate_serialize.t
index b51f961..5eed843 100644
--- a/t/68inflate_serialize.t
+++ b/t/68inflate_serialize.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 use Data::Dumper;
 
diff --git a/t/69update.t b/t/69update.t
index 70d7038..3372b4f 100644
--- a/t/69update.t
+++ b/t/69update.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 BEGIN {
         eval "use DBD::SQLite";
diff --git a/t/70auto.t b/t/70auto.t
index b108369..440c943 100644
--- a/t/70auto.t
+++ b/t/70auto.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 2;
 
diff --git a/t/75limit.t b/t/75limit.t
index 98d3b64..0fc7e3a 100644
--- a/t/75limit.t
+++ b/t/75limit.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 BEGIN {
     eval "use DBD::SQLite";
diff --git a/t/76joins.t b/t/76joins.t
index 069626a..c697254 100644
--- a/t/76joins.t
+++ b/t/76joins.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 use IO::File;
 
diff --git a/t/77join_count.t b/t/77join_count.t
index 499b08f..f46ad04 100644
--- a/t/77join_count.t
+++ b/t/77join_count.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 eval "use DBD::SQLite";
 plan skip_all => 'needs DBD::SQLite for testing' if $@;
diff --git a/t/78self_referencial.t b/t/78self_referencial.t
index 5759aca..640cbc2 100644
--- a/t/78self_referencial.t
+++ b/t/78self_referencial.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 # this test will check to see if you can have 2 columns
 # in the same class pointing at the same other class
diff --git a/t/79uuid.t b/t/79uuid.t
index 04fcca6..1a3061d 100644
--- a/t/79uuid.t
+++ b/t/79uuid.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 eval 'use Data::UUID ; 1'
   or plan skip_all => 'Install Data::UUID run this test';
diff --git a/t/80unique.t b/t/80unique.t
index 9d7634c..30767d2 100644
--- a/t/80unique.t
+++ b/t/80unique.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 34;
 
diff --git a/t/81transactions.t b/t/81transactions.t
index c9d9c62..847963e 100644
--- a/t/81transactions.t
+++ b/t/81transactions.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 39;
 
diff --git a/t/82cascade_copy.t b/t/82cascade_copy.t
index f0c302d..26b8425 100644
--- a/t/82cascade_copy.t
+++ b/t/82cascade_copy.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 4;
 my $artist = $schema->resultset('Artist')->find(1);
diff --git a/t/83cache.t b/t/83cache.t
index 39f782a..78113b3 100644
--- a/t/83cache.t
+++ b/t/83cache.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 my $queries;
 $schema->storage->debugcb( sub{ $queries++ } );
diff --git a/t/84serialize.t b/t/84serialize.t
index d79acba..a8cedf0 100644
--- a/t/84serialize.t
+++ b/t/84serialize.t
@@ -6,7 +6,7 @@ use lib qw(t/lib);
 use DBICTest;
 use Storable;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 1;
 
diff --git a/t/85utf8.t b/t/85utf8.t
index c0f39ed..562efb4 100644
--- a/t/85utf8.t
+++ b/t/85utf8.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 eval 'use Encode ; 1'
     or plan skip_all => 'Install Encode run this test';
diff --git a/t/86might_have.t b/t/86might_have.t
index 1d4af78..81cbf84 100644
--- a/t/86might_have.t
+++ b/t/86might_have.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 my $queries;
 #$schema->storage->debugfh(IO::File->new('t/var/temp.trace', 'w'));
diff --git a/t/87ordered.t b/t/87ordered.t
index 1e4f33a..b1d484c 100644
--- a/t/87ordered.t
+++ b/t/87ordered.t
@@ -6,7 +6,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 321;
 
diff --git a/t/88result_set_column.t b/t/88result_set_column.t
index 5ed86d4..936a0a7 100644
--- a/t/88result_set_column.t
+++ b/t/88result_set_column.t
@@ -5,7 +5,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 plan tests => 8; 
 
diff --git a/t/89dbicadmin.t b/t/89dbicadmin.t
index a411eb7..0b1d1f5 100644
--- a/t/89dbicadmin.t
+++ b/t/89dbicadmin.t
@@ -6,7 +6,7 @@ use Test::More;
 use lib qw(t/lib);
 use DBICTest;
 
-my $schema = DBICTest::init_schema();
+my $schema = DBICTest->init_schema();
 
 eval 'require JSON';
 plan skip_all => 'Install JSON to run this test' if ($@);
diff --git a/t/cdbi-sweet-t/08pager.t b/t/cdbi-sweet-t/08pager.t
index e105932..71ccaed 100644
--- a/t/cdbi-sweet-t/08pager.t
+++ b/t/cdbi-sweet-t/08pager.t
@@ -16,7 +16,7 @@ BEGIN {
 use lib 't/lib';
 
 use_ok('DBICTest');
-DBICTest::init_schema();
+DBICTest->init_schema();
 
 DBICTest::CD->load_components(qw/CDBICompat::Pager/);