From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Sun, 21 Mar 2010 05:12:59 +0000 (-0500)
Subject: so apparently I dont need this anymore.  Awesome
X-Git-Tag: v0.001000_01~62
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=8b2c6f39484dd3dd94e1b7ed5ebe63f2ba98d0fb;p=dbsrgits%2FDBIx-Class-DeploymentHandler.git

so apparently I dont need this anymore.  Awesome
---

diff --git a/t/lib/DBICTest.pm b/t/lib/DBICTest.pm
deleted file mode 100644
index 8006961..0000000
--- a/t/lib/DBICTest.pm
+++ /dev/null
@@ -1,331 +0,0 @@
-package # hide from PAUSE 
-    DBICTest;
-
-use strict;
-use warnings;
-use DBICTest::AuthorCheck;
-use DBICTest::Schema;
-
-=head1 NAME
-
-DBICTest - Library to be used by DBIx::Class test scripts.
-
-=head1 SYNOPSIS
-
-  use lib qw(t/lib);
-  use DBICTest;
-  use Test::More;
-  
-  my $schema = DBICTest->init_schema();
-
-=head1 DESCRIPTION
-
-This module provides the basic utilities to write tests against 
-DBIx::Class.
-
-=head1 METHODS
-
-=head2 init_schema
-
-  my $schema = DBICTest->init_schema(
-    no_deploy=>1,
-    no_populate=>1,
-    storage_type=>'::DBI::Replicated',
-    storage_type_args=>{
-      balancer_type=>'DBIx::Class::Storage::DBI::Replicated::Balancer::Random'
-    },
-  );
-
-This method removes the test SQLite database in t/var/DBIxClass.db 
-and then creates a new, empty database.
-
-This method will call deploy_schema() by default, unless the 
-no_deploy flag is set.
-
-Also, by default, this method will call populate_schema() by 
-default, unless the no_deploy or no_populate flags are set.
-
-=cut
-
-sub has_custom_dsn {
-    return $ENV{"DBICTEST_DSN"} ? 1:0;
-}
-
-sub _sqlite_dbfilename {
-    return "t/var/DBIxClass.db";
-}
-
-sub _sqlite_dbname {
-    my $self = shift;
-    my %args = @_;
-    return $self->_sqlite_dbfilename if $args{sqlite_use_file} or $ENV{"DBICTEST_SQLITE_USE_FILE"};
-    return ":memory:";
-}
-
-sub _database {
-    my $self = shift;
-    my %args = @_;
-    my $db_file = $self->_sqlite_dbname(%args);
-
-    unlink($db_file) if -e $db_file;
-    unlink($db_file . "-journal") if -e $db_file . "-journal";
-    mkdir("t/var") unless -d "t/var";
-
-    my $dsn = $ENV{"DBICTEST_DSN"} || "dbi:SQLite:${db_file}";
-    my $dbuser = $ENV{"DBICTEST_DBUSER"} || '';
-    my $dbpass = $ENV{"DBICTEST_DBPASS"} || '';
-
-    my @connect_info = ($dsn, $dbuser, $dbpass, { AutoCommit => 1, %args });
-
-    return @connect_info;
-}
-
-sub init_schema {
-    my $self = shift;
-    my %args = @_;
-
-    my $schema;
-
-    if ($args{compose_connection}) {
-      $schema = DBICTest::Schema->compose_connection(
-                  'DBICTest', $self->_database(%args)
-                );
-    } else {
-      $schema = DBICTest::Schema->compose_namespace('DBICTest');
-    }
-    if( $args{storage_type}) {
-      $schema->storage_type($args{storage_type});
-    }
-    if ( !$args{no_connect} ) {
-      $schema = $schema->connect($self->_database(%args));
-      $schema->storage->on_connect_do(['PRAGMA synchronous = OFF'])
-       unless $self->has_custom_dsn;
-    }
-    if ( !$args{no_deploy} ) {
-        __PACKAGE__->deploy_schema( $schema, $args{deploy_args} );
-        __PACKAGE__->populate_schema( $schema )
-         if( !$args{no_populate} );
-    }
-    return $schema;
-}
-
-=head2 deploy_schema
-
-  DBICTest->deploy_schema( $schema );
-
-This method does one of two things to the schema.  It can either call 
-the experimental $schema->deploy() if the DBICTEST_SQLT_DEPLOY environment 
-variable is set, otherwise the default is to read in the t/lib/sqlite.sql 
-file and execute the SQL within. Either way you end up with a fresh set 
-of tables for testing.
-
-=cut
-
-sub deploy_schema {
-    my $self = shift;
-    my $schema = shift;
-    my $args = shift || {};
-
-    if ($ENV{"DBICTEST_SQLT_DEPLOY"}) { 
-        $schema->deploy($args);
-    } else {
-        open IN, "t/lib/sqlite.sql";
-        my $sql;
-        { local $/ = undef; $sql = <IN>; }
-        close IN;
-        for my $chunk ( split (/;\s*\n+/, $sql) ) {
-          if ( $chunk =~ / ^ (?! --\s* ) \S /xm ) {  # there is some real sql in the chunk - a non-space at the start of the string which is not a comment
-            $schema->storage->dbh_do(sub { $_[1]->do($chunk) }) or print "Error on SQL: $chunk\n";
-          }
-        }
-    }
-    return;
-}
-
-=head2 populate_schema
-
-  DBICTest->populate_schema( $schema );
-
-After you deploy your schema you can use this method to populate 
-the tables with test data.
-
-=cut
-
-sub populate_schema {
-    my $self = shift;
-    my $schema = shift;
-
-    $schema->populate('Genre', [
-      [qw/genreid name/],
-      [qw/1       emo  /],
-    ]);
-
-    $schema->populate('Artist', [
-        [ qw/artistid name/ ],
-        [ 1, 'Caterwauler McCrae' ],
-        [ 2, 'Random Boy Band' ],
-        [ 3, 'We Are Goth' ],
-    ]);
-
-    $schema->populate('CD', [
-        [ qw/cdid artist title year genreid/ ],
-        [ 1, 1, "Spoonful of bees", 1999, 1 ],
-        [ 2, 1, "Forkful of bees", 2001 ],
-        [ 3, 1, "Caterwaulin' Blues", 1997 ],
-        [ 4, 2, "Generic Manufactured Singles", 2001 ],
-        [ 5, 3, "Come Be Depressed With Us", 1998 ],
-    ]);
-
-    $schema->populate('LinerNotes', [
-        [ qw/liner_id notes/ ],
-        [ 2, "Buy Whiskey!" ],
-        [ 4, "Buy Merch!" ],
-        [ 5, "Kill Yourself!" ],
-    ]);
-
-    $schema->populate('Tag', [
-        [ qw/tagid cd tag/ ],
-        [ 1, 1, "Blue" ],
-        [ 2, 2, "Blue" ],
-        [ 3, 3, "Blue" ],
-        [ 4, 5, "Blue" ],
-        [ 5, 2, "Cheesy" ],
-        [ 6, 4, "Cheesy" ],
-        [ 7, 5, "Cheesy" ],
-        [ 8, 2, "Shiny" ],
-        [ 9, 4, "Shiny" ],
-    ]);
-
-    $schema->populate('TwoKeys', [
-        [ qw/artist cd/ ],
-        [ 1, 1 ],
-        [ 1, 2 ],
-        [ 2, 2 ],
-    ]);
-
-    $schema->populate('FourKeys', [
-        [ qw/foo bar hello goodbye sensors/ ],
-        [ 1, 2, 3, 4, 'online' ],
-        [ 5, 4, 3, 6, 'offline' ],
-    ]);
-
-    $schema->populate('OneKey', [
-        [ qw/id artist cd/ ],
-        [ 1, 1, 1 ],
-        [ 2, 1, 2 ],
-        [ 3, 2, 2 ],
-    ]);
-
-    $schema->populate('SelfRef', [
-        [ qw/id name/ ],
-        [ 1, 'First' ],
-        [ 2, 'Second' ],
-    ]);
-
-    $schema->populate('SelfRefAlias', [
-        [ qw/self_ref alias/ ],
-        [ 1, 2 ]
-    ]);
-
-    $schema->populate('ArtistUndirectedMap', [
-        [ qw/id1 id2/ ],
-        [ 1, 2 ]
-    ]);
-
-    $schema->populate('Producer', [
-        [ qw/producerid name/ ],
-        [ 1, 'Matt S Trout' ],
-        [ 2, 'Bob The Builder' ],
-        [ 3, 'Fred The Phenotype' ],
-    ]);
-
-    $schema->populate('CD_to_Producer', [
-        [ qw/cd producer/ ],
-        [ 1, 1 ],
-        [ 1, 2 ],
-        [ 1, 3 ],
-    ]);
-    
-    $schema->populate('TreeLike', [
-        [ qw/id parent name/ ],
-        [ 1, undef, 'root' ],
-        [ 2, 1, 'foo'  ],
-        [ 3, 2, 'bar'  ],
-        [ 6, 2, 'blop' ],
-        [ 4, 3, 'baz'  ],
-        [ 5, 4, 'quux' ],
-        [ 7, 3, 'fong'  ],
-    ]);
-
-    $schema->populate('Track', [
-        [ qw/trackid cd  position title/ ],
-        [ 4, 2, 1, "Stung with Success"],
-        [ 5, 2, 2, "Stripy"],
-        [ 6, 2, 3, "Sticky Honey"],
-        [ 7, 3, 1, "Yowlin"],
-        [ 8, 3, 2, "Howlin"],
-        [ 9, 3, 3, "Fowlin"],
-        [ 10, 4, 1, "Boring Name"],
-        [ 11, 4, 2, "Boring Song"],
-        [ 12, 4, 3, "No More Ideas"],
-        [ 13, 5, 1, "Sad"],
-        [ 14, 5, 2, "Under The Weather"],
-        [ 15, 5, 3, "Suicidal"],
-        [ 16, 1, 1, "The Bees Knees"],
-        [ 17, 1, 2, "Apiary"],
-        [ 18, 1, 3, "Beehind You"],
-    ]);
-
-    $schema->populate('Event', [
-        [ qw/id starts_at created_on varchar_date varchar_datetime skip_inflation/ ],
-        [ 1, '2006-04-25 22:24:33', '2006-06-22 21:00:05', '2006-07-23', '2006-05-22 19:05:07', '2006-04-21 18:04:06'],
-    ]);
-
-    $schema->populate('Link', [
-        [ qw/id url title/ ],
-        [ 1, '', 'aaa' ]
-    ]);
-
-    $schema->populate('Bookmark', [
-        [ qw/id link/ ],
-        [ 1, 1 ]
-    ]);
-
-    $schema->populate('Collection', [
-        [ qw/collectionid name/ ],
-        [ 1, "Tools" ],
-        [ 2, "Body Parts" ],
-    ]);
-    
-    $schema->populate('TypedObject', [
-        [ qw/objectid type value/ ],
-        [ 1, "pointy", "Awl" ],
-        [ 2, "round", "Bearing" ],
-        [ 3, "pointy", "Knife" ],
-        [ 4, "pointy", "Tooth" ],
-        [ 5, "round", "Head" ],
-    ]);
-    $schema->populate('CollectionObject', [
-        [ qw/collection object/ ],
-        [ 1, 1 ],
-        [ 1, 2 ],
-        [ 1, 3 ],
-        [ 2, 4 ],
-        [ 2, 5 ],
-    ]);
-
-    $schema->populate('Owners', [
-        [ qw/id name/ ],
-        [ 1, "Newton" ],
-        [ 2, "Waltham" ],
-    ]);
-
-    $schema->populate('BooksInLibrary', [
-        [ qw/id owner title source price/ ],
-        [ 1, 1, "Programming Perl", "Library", 23 ],
-        [ 2, 1, "Dynamical Systems", "Library",  37 ],
-        [ 3, 2, "Best Recipe Cookbook", "Library", 65 ],
-    ]);
-}
-
-1;
diff --git a/t/lib/DBICTest/AuthorCheck.pm b/t/lib/DBICTest/AuthorCheck.pm
deleted file mode 100644
index f793cf0..0000000
--- a/t/lib/DBICTest/AuthorCheck.pm
+++ /dev/null
@@ -1,115 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::AuthorCheck;
-
-use strict;
-use warnings;
-
-use Path::Class qw/file dir/;
-
-_check_author_makefile() unless $ENV{DBICTEST_NO_MAKEFILE_VERIFICATION};
-
-# Die if the author did not update his makefile
-#
-# This is pretty heavy handed, so the check is pretty solid:
-#
-# 1) Assume that this particular module is loaded from -I <$root>/t/lib
-# 2) Make sure <$root>/Makefile.PL exists
-# 3) Make sure we can stat() <$root>/Makefile.PL
-#
-# If all of the above is satisfied
-#
-# *) die if <$root>/inc does not exist
-# *) die if no stat() results for <$root>/Makefile (covers no Makefile)
-# *) die if Makefile.PL mtime > Makefile mtime
-#
-sub _check_author_makefile {
-
-  my $root = _find_co_root()
-    or return;
-
-  # not using file->stat as it invokes File::stat which in turn breaks stat(_)
-  my ($mf_pl_mtime, $mf_mtime) = ( map
-    { (stat ($root->file ($_)) )[9] }
-    qw/Makefile.PL Makefile/
-  );
-
-  return unless $mf_pl_mtime;   # something went wrong during co_root detection ?
-
-  if (
-    not -d $root->subdir ('inc') 
-      or
-    not $mf_mtime
-      or
-    $mf_mtime < $mf_pl_mtime
-  ) {
-    print STDERR <<'EOE';
-
-
-
-
-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-======================== FATAL ERROR ===========================
-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-
-We have a number of reasons to believe that this is a development
-checkout and that you, the user, did not run `perl Makefile.PL`
-before using this code. You absolutely _must_ perform this step,
-and ensure you have all required dependencies present. Not doing
-so often results in a lot of wasted time for other contributors
-trying to assit you with spurious "its broken!" problems.
-
-If you are seeing this message unexpectedly (i.e. you are in fact
-attempting a regular installation be it through CPAN or manually),
-please report the situation to either the mailing list or to the
-irc channel as described in
-
-http://search.cpan.org/dist/DBIx-Class/lib/DBIx/Class.pm#GETTING_HELP/SUPPORT
-
-The DBIC team
-
-
-
-EOE
-
-    exit 1;
-  }
-}
-
-# Mimic $Module::Install::AUTHOR
-sub is_author {
-
-  my $root = _find_co_root()
-    or return undef;
-
-  return (
-    ( not -d $root->subdir ('inc') )
-      or
-    ( -e $root->subdir ('inc')->file ($^O eq 'VMS' ? '_author' : '.author') )
-  );
-}
-
-# Try to determine the root of a checkout/untar if possible
-# or return undef
-sub _find_co_root {
-
-    my @mod_parts = split /::/, (__PACKAGE__ . '.pm');
-    my $rel_path = join ('/', @mod_parts);  # %INC stores paths with / regardless of OS
-
-    return undef unless ($INC{$rel_path});
-
-    # a bit convoluted, but what we do here essentially is:
-    #  - get the file name of this particular module
-    #  - do 'cd ..' as many times as necessary to get to t/lib/../..
-
-    my $root = dir ($INC{$rel_path});
-    for (1 .. @mod_parts + 2) {
-        $root = $root->parent;
-    }
-
-    return (-f $root->file ('Makefile.PL') )
-      ? $root
-      : undef
-    ;
-}
-
-1;
diff --git a/t/lib/DBICTest/BaseResult.pm b/t/lib/DBICTest/BaseResult.pm
deleted file mode 100644
index 4f38202..0000000
--- a/t/lib/DBICTest/BaseResult.pm
+++ /dev/null
@@ -1,13 +0,0 @@
-package #hide from pause
-  DBICTest::BaseResult;
-
-use strict;
-use warnings;
-
-use base qw/DBIx::Class::Core/;
-use DBICTest::BaseResultSet;
-
-__PACKAGE__->table ('bogus');
-__PACKAGE__->resultset_class ('DBICTest::BaseResultSet');
-
-1;
diff --git a/t/lib/DBICTest/BaseResultSet.pm b/t/lib/DBICTest/BaseResultSet.pm
deleted file mode 100644
index 6d9df85..0000000
--- a/t/lib/DBICTest/BaseResultSet.pm
+++ /dev/null
@@ -1,13 +0,0 @@
-package #hide from pause
-  DBICTest::BaseResultSet;
-
-use strict;
-use warnings;
-
-use base qw/DBIx::Class::ResultSet/;
-
-sub hri_dump {
-  return shift->search ({}, { result_class => 'DBIx::Class::ResultClass::HashRefInflator' });
-}
-
-1;
diff --git a/t/lib/DBICTest/ErrorComponent.pm b/t/lib/DBICTest/ErrorComponent.pm
deleted file mode 100644
index 67f54e8..0000000
--- a/t/lib/DBICTest/ErrorComponent.pm
+++ /dev/null
@@ -1,8 +0,0 @@
-#   belongs to t/run/90ensure_class_loaded.tl
-package # hide from PAUSE 
-    DBICTest::ErrorComponent;
-use warnings;
-use strict;
-
-# this is missing on purpose
-# 1;
diff --git a/t/lib/DBICTest/FakeComponent.pm b/t/lib/DBICTest/FakeComponent.pm
deleted file mode 100644
index fbe21f0..0000000
--- a/t/lib/DBICTest/FakeComponent.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-#   belongs to t/run/90ensure_class_loaded.tl
-package # hide from PAUSE 
-    DBICTest::FakeComponent;
-use warnings;
-use strict;
-
-1;
diff --git a/t/lib/DBICTest/ForeignComponent.pm b/t/lib/DBICTest/ForeignComponent.pm
deleted file mode 100644
index 333dd26..0000000
--- a/t/lib/DBICTest/ForeignComponent.pm
+++ /dev/null
@@ -1,11 +0,0 @@
-#   belongs to t/05components.t
-package # hide from PAUSE 
-    DBICTest::ForeignComponent;
-use warnings;
-use strict;
-
-use base qw/ DBIx::Class /;
-
-__PACKAGE__->load_components( qw/ +DBICTest::ForeignComponent::TestComp / );
-
-1;
diff --git a/t/lib/DBICTest/ForeignComponent/TestComp.pm b/t/lib/DBICTest/ForeignComponent/TestComp.pm
deleted file mode 100644
index cc95940..0000000
--- a/t/lib/DBICTest/ForeignComponent/TestComp.pm
+++ /dev/null
@@ -1,9 +0,0 @@
-#   belongs to t/05components.t
-package # hide from PAUSE
-    DBICTest::ForeignComponent::TestComp;
-use warnings;
-use strict;
-
-sub foreign_test_method { 1 }
-
-1;
diff --git a/t/lib/DBICTest/OptionalComponent.pm b/t/lib/DBICTest/OptionalComponent.pm
deleted file mode 100644
index 5f0d36a..0000000
--- a/t/lib/DBICTest/OptionalComponent.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-#   belongs to t/run/90ensure_class_loaded.tl
-package # hide from PAUSE 
-    DBICTest::OptionalComponent;
-use warnings;
-use strict;
-
-1;
diff --git a/t/lib/DBICTest/Plain.pm b/t/lib/DBICTest/Plain.pm
deleted file mode 100644
index 209cc3e..0000000
--- a/t/lib/DBICTest/Plain.pm
+++ /dev/null
@@ -1,40 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Plain;
-
-use strict;
-use warnings;
-use base qw/DBIx::Class::Schema/;
-use DBI;
-
-my $db_file = "t/var/Plain.db";
-
-unlink($db_file) if -e $db_file;
-unlink($db_file . "-journal") if -e $db_file . "-journal";
-mkdir("t/var") unless -d "t/var";
-
-my $dsn = "dbi:SQLite:${db_file}";
-
-__PACKAGE__->load_classes("Test");
-my $schema = __PACKAGE__->compose_connection(
-  __PACKAGE__,
-  $dsn,
-  undef,
-  undef,
-  { AutoCommit => 1 }
-);
-
-my $dbh = DBI->connect($dsn);
-
-my $sql = <<EOSQL;
-CREATE TABLE test (
-  id INTEGER NOT NULL,
-  name VARCHAR(32) NOT NULL
-);
-
-INSERT INTO test (id, name) VALUES (1, 'DBIC::Plain is broken!');
-
-EOSQL
-
-$dbh->do($_) for split(/\n\n/, $sql);
-
-1;
diff --git a/t/lib/DBICTest/Plain/Test.pm b/t/lib/DBICTest/Plain/Test.pm
deleted file mode 100644
index e950278..0000000
--- a/t/lib/DBICTest/Plain/Test.pm
+++ /dev/null
@@ -1,18 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Plain::Test;
-
-use base 'DBIx::Class::Core';
-
-__PACKAGE__->table('test');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1
-  },
-  'name' => {
-    data_type => 'varchar',
-  },
-);
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/ResultSetManager.pm b/t/lib/DBICTest/ResultSetManager.pm
deleted file mode 100644
index 08b3159..0000000
--- a/t/lib/DBICTest/ResultSetManager.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::ResultSetManager;
-use base 'DBIx::Class::Schema';
-
-__PACKAGE__->load_classes("Foo");
-
-1;
diff --git a/t/lib/DBICTest/ResultSetManager/Foo.pm b/t/lib/DBICTest/ResultSetManager/Foo.pm
deleted file mode 100644
index 30c1c95..0000000
--- a/t/lib/DBICTest/ResultSetManager/Foo.pm
+++ /dev/null
@@ -1,10 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::ResultSetManager::Foo;
-use base 'DBIx::Class::Core';
-
-__PACKAGE__->load_components(qw/ ResultSetManager /);
-__PACKAGE__->table('foo');
-
-sub bar : ResultSet { 'good' }
-
-1;
diff --git a/t/lib/DBICTest/Schema.pm b/t/lib/DBICTest/Schema.pm
deleted file mode 100644
index a3e4484..0000000
--- a/t/lib/DBICTest/Schema.pm
+++ /dev/null
@@ -1,61 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema;
-
-use base qw/DBIx::Class::Schema/;
-
-no warnings qw/qw/;
-
-__PACKAGE__->load_classes(qw/
-  Artist
-  SequenceTest
-  BindType
-  Employee
-  CD
-  FileColumn
-  Genre
-  Link
-  Bookmark
-  #dummy
-  Track
-  Tag
-  Year2000CDs
-  Year1999CDs
-  CustomSql
-  Money
-  /,
-  { 'DBICTest::Schema' => [qw/
-    LinerNotes
-    Artwork
-    Artwork_to_Artist
-    Image
-    Lyrics
-    LyricVersion
-    OneKey
-    #dummy
-    TwoKeys
-    Serialized
-  /]},
-  (
-    'FourKeys',
-    'FourKeys_to_TwoKeys',
-    '#dummy',
-    'SelfRef',
-    'ArtistUndirectedMap',
-    'ArtistSourceName',
-    'ArtistSubclass',
-    'Producer',
-    'CD_to_Producer',
-    'Dummy',    # this is a real result class we remove in the hook below
-  ),
-  qw/SelfRefAlias TreeLike TwoKeyTreeLike Event EventTZ NoPrimaryKey/,
-  qw/Collection CollectionObject TypedObject Owners BooksInLibrary/,
-  qw/ForceForeign Encoded/,
-);
-
-sub sqlt_deploy_hook {
-  my ($self, $sqlt_schema) = @_;
-
-  $sqlt_schema->drop_table('dummy');
-}
-
-1;
diff --git a/t/lib/DBICTest/Schema/Artist.pm b/t/lib/DBICTest/Schema/Artist.pm
deleted file mode 100644
index dd5028e..0000000
--- a/t/lib/DBICTest/Schema/Artist.pm
+++ /dev/null
@@ -1,82 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Artist;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('artist');
-__PACKAGE__->source_info({
-    "source_info_key_A" => "source_info_value_A",
-    "source_info_key_B" => "source_info_value_B",
-    "source_info_key_C" => "source_info_value_C",
-});
-__PACKAGE__->add_columns(
-  'artistid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => 100,
-    is_nullable => 1,
-  },
-  rank => {
-    data_type => 'integer',
-    default_value => 13,
-  },
-  charfield => {
-    data_type => 'char',
-    size => 10,
-    is_nullable => 1,
-  },
-);
-__PACKAGE__->set_primary_key('artistid');
-__PACKAGE__->add_unique_constraint(artist => ['artistid']); # do not remove, part of a test
-
-__PACKAGE__->mk_classdata('field_name_for', {
-    artistid    => 'primary key',
-    name        => 'artist name',
-});
-
-__PACKAGE__->has_many(
-    cds => 'DBICTest::Schema::CD', undef,
-    { order_by => 'year' },
-);
-__PACKAGE__->has_many(
-    cds_unordered => 'DBICTest::Schema::CD'
-);
-__PACKAGE__->has_many(
-    cds_very_very_very_long_relationship_name => 'DBICTest::Schema::CD'
-);
-
-__PACKAGE__->has_many( twokeys => 'DBICTest::Schema::TwoKeys' );
-__PACKAGE__->has_many( onekeys => 'DBICTest::Schema::OneKey' );
-
-__PACKAGE__->has_many(
-  artist_undirected_maps => 'DBICTest::Schema::ArtistUndirectedMap',
-  [ {'foreign.id1' => 'self.artistid'}, {'foreign.id2' => 'self.artistid'} ],
-  { cascade_copy => 0 } # this would *so* not make sense
-);
-
-__PACKAGE__->has_many(
-    artwork_to_artist => 'DBICTest::Schema::Artwork_to_Artist' => 'artist_id'
-);
-__PACKAGE__->many_to_many('artworks', 'artwork_to_artist', 'artwork');
-
-
-sub sqlt_deploy_hook {
-  my ($self, $sqlt_table) = @_;
-
-  if ($sqlt_table->schema->translator->producer_type =~ /SQLite$/ ) {
-    $sqlt_table->add_index( name => 'artist_name_hookidx', fields => ['name'] )
-      or die $sqlt_table->error;
-  }
-}
-
-sub store_column {
-  my ($self, $name, $value) = @_;
-  $value = 'X '.$value if ($name eq 'name' && $value && $value =~ /(X )?store_column test/);
-  $self->next::method($name, $value);
-}
-
-
-1;
diff --git a/t/lib/DBICTest/Schema/ArtistGUID.pm b/t/lib/DBICTest/Schema/ArtistGUID.pm
deleted file mode 100644
index cad8965..0000000
--- a/t/lib/DBICTest/Schema/ArtistGUID.pm
+++ /dev/null
@@ -1,35 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::ArtistGUID;
-
-use base qw/DBICTest::BaseResult/;
-
-# test MSSQL uniqueidentifier type
-
-__PACKAGE__->table('artist');
-__PACKAGE__->add_columns(
-  'artistid' => {
-    data_type => 'uniqueidentifier' # auto_nextval not necessary for PK
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => 100,
-    is_nullable => 1,
-  },
-  rank => {
-    data_type => 'integer',
-    default_value => 13,
-  },
-  charfield => {
-    data_type => 'char',
-    size => 10,
-    is_nullable => 1,
-  },
-  a_guid => {
-    data_type => 'uniqueidentifier',
-    auto_nextval => 1, # necessary here, because not a PK
-    is_nullable => 1,
-  }
-);
-__PACKAGE__->set_primary_key('artistid');
-
-1;
diff --git a/t/lib/DBICTest/Schema/ArtistSourceName.pm b/t/lib/DBICTest/Schema/ArtistSourceName.pm
deleted file mode 100644
index c59bbe5..0000000
--- a/t/lib/DBICTest/Schema/ArtistSourceName.pm
+++ /dev/null
@@ -1,8 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::ArtistSourceName;
-
-use base 'DBICTest::Schema::Artist';
-__PACKAGE__->table(__PACKAGE__->table);
-__PACKAGE__->source_name('SourceNameArtists');
-
-1;
diff --git a/t/lib/DBICTest/Schema/ArtistSubclass.pm b/t/lib/DBICTest/Schema/ArtistSubclass.pm
deleted file mode 100644
index 8dd3f6f..0000000
--- a/t/lib/DBICTest/Schema/ArtistSubclass.pm
+++ /dev/null
@@ -1,8 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::ArtistSubclass;
-
-use base 'DBICTest::Schema::Artist';
-
-__PACKAGE__->table(__PACKAGE__->table);
-
-1;
\ No newline at end of file
diff --git a/t/lib/DBICTest/Schema/ArtistUndirectedMap.pm b/t/lib/DBICTest/Schema/ArtistUndirectedMap.pm
deleted file mode 100644
index 2f4d85f..0000000
--- a/t/lib/DBICTest/Schema/ArtistUndirectedMap.pm
+++ /dev/null
@@ -1,20 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::ArtistUndirectedMap;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('artist_undirected_map');
-__PACKAGE__->add_columns(
-  'id1' => { data_type => 'integer' },
-  'id2' => { data_type => 'integer' },
-);
-__PACKAGE__->set_primary_key(qw/id1 id2/);
-
-__PACKAGE__->belongs_to( 'artist1', 'DBICTest::Schema::Artist', 'id1', { on_delete => 'RESTRICT', on_update => 'CASCADE'} );
-__PACKAGE__->belongs_to( 'artist2', 'DBICTest::Schema::Artist', 'id2', { on_delete => undef, on_update => undef} );
-__PACKAGE__->has_many(
-  'mapped_artists', 'DBICTest::Schema::Artist',
-  [ {'foreign.artistid' => 'self.id1'}, {'foreign.artistid' => 'self.id2'} ],
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/Artwork.pm b/t/lib/DBICTest/Schema/Artwork.pm
deleted file mode 100644
index 4eecef5..0000000
--- a/t/lib/DBICTest/Schema/Artwork.pm
+++ /dev/null
@@ -1,20 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Artwork;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('cd_artwork');
-__PACKAGE__->add_columns(
-  'cd_id' => {
-    data_type => 'integer',
-    is_nullable => 0,
-  },
-);
-__PACKAGE__->set_primary_key('cd_id');
-__PACKAGE__->belongs_to('cd', 'DBICTest::Schema::CD', 'cd_id');
-__PACKAGE__->has_many('images', 'DBICTest::Schema::Image', 'artwork_id');
-
-__PACKAGE__->has_many('artwork_to_artist', 'DBICTest::Schema::Artwork_to_Artist', 'artwork_cd_id');
-__PACKAGE__->many_to_many('artists', 'artwork_to_artist', 'artist');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Artwork_to_Artist.pm b/t/lib/DBICTest/Schema/Artwork_to_Artist.pm
deleted file mode 100644
index 0859080..0000000
--- a/t/lib/DBICTest/Schema/Artwork_to_Artist.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Artwork_to_Artist;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('artwork_to_artist');
-__PACKAGE__->add_columns(
-  'artwork_cd_id' => {
-    data_type => 'integer',
-    is_foreign_key => 1,
-  },
-  'artist_id' => {
-    data_type => 'integer',
-    is_foreign_key => 1,
-  },
-);
-__PACKAGE__->set_primary_key(qw/artwork_cd_id artist_id/);
-__PACKAGE__->belongs_to('artwork', 'DBICTest::Schema::Artwork', 'artwork_cd_id');
-__PACKAGE__->belongs_to('artist', 'DBICTest::Schema::Artist', 'artist_id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/BindType.pm b/t/lib/DBICTest/Schema/BindType.pm
deleted file mode 100644
index 5670f2f..0000000
--- a/t/lib/DBICTest/Schema/BindType.pm
+++ /dev/null
@@ -1,29 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::BindType;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('bindtype_test');
-
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'bytea' => {
-    data_type => 'bytea',
-    is_nullable => 1,
-  },
-  'blob' => {
-    data_type => 'blob',
-    is_nullable => 1,
-  },
-  'clob' => {
-    data_type => 'clob',
-    is_nullable => 1,
-  },
-);
-
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Bookmark.pm b/t/lib/DBICTest/Schema/Bookmark.pm
deleted file mode 100644
index 8c2c3b1..0000000
--- a/t/lib/DBICTest/Schema/Bookmark.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Bookmark;
-
-    use base qw/DBICTest::BaseResult/;
-
-
-use strict;
-use warnings;
-
-__PACKAGE__->table('bookmark');
-__PACKAGE__->add_columns(
-    'id' => {
-        data_type => 'integer',
-        is_auto_increment => 1
-    },
-    'link' => {
-        data_type => 'integer',
-        is_nullable => 1,
-    },
-);
-
-__PACKAGE__->set_primary_key('id');
-__PACKAGE__->belongs_to(link => 'DBICTest::Schema::Link', 'link', { on_delete => 'SET NULL' } );
-
-1;
diff --git a/t/lib/DBICTest/Schema/BooksInLibrary.pm b/t/lib/DBICTest/Schema/BooksInLibrary.pm
deleted file mode 100644
index 8da54e6..0000000
--- a/t/lib/DBICTest/Schema/BooksInLibrary.pm
+++ /dev/null
@@ -1,34 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::BooksInLibrary;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('books');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'source' => {
-    data_type => 'varchar',
-    size      => '100',
-  },
-  'owner' => {
-    data_type => 'integer',
-  },
-  'title' => {
-    data_type => 'varchar',
-    size      => '100',
-  },
-  'price' => {
-    data_type => 'integer',
-    is_nullable => 1,
-  },
-);
-__PACKAGE__->set_primary_key('id');
-
-__PACKAGE__->resultset_attributes({where => { source => "Library" } });
-
-__PACKAGE__->belongs_to ( owner => 'DBICTest::Schema::Owners', 'owner' );
-
-1;
diff --git a/t/lib/DBICTest/Schema/CD.pm b/t/lib/DBICTest/Schema/CD.pm
deleted file mode 100644
index fadd539..0000000
--- a/t/lib/DBICTest/Schema/CD.pm
+++ /dev/null
@@ -1,92 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::CD;
-
-use base qw/DBICTest::BaseResult/;
-
-# this tests table name as scalar ref
-# DO NOT REMOVE THE \
-__PACKAGE__->table(\'cd');
-
-__PACKAGE__->add_columns(
-  'cdid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'artist' => {
-    data_type => 'integer',
-  },
-  'title' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-  'year' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-  'genreid' => { 
-    data_type => 'integer',
-    is_nullable => 1,
-    accessor => undef,
-  },
-  'single_track' => {
-    data_type => 'integer',
-    is_nullable => 1,
-    is_foreign_key => 1,
-  }
-);
-__PACKAGE__->set_primary_key('cdid');
-__PACKAGE__->add_unique_constraint([ qw/artist title/ ]);
-
-__PACKAGE__->belongs_to( artist => 'DBICTest::Schema::Artist', undef, { 
-    is_deferrable => 1, 
-});
-
-# in case this is a single-cd it promotes a track from another cd
-__PACKAGE__->belongs_to( single_track => 'DBICTest::Schema::Track', 'single_track', 
-    { join_type => 'left'} 
-);
-
-__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track' );
-__PACKAGE__->has_many(
-    tags => 'DBICTest::Schema::Tag', undef,
-    { order_by => 'tag' },
-);
-__PACKAGE__->has_many(
-    cd_to_producer => 'DBICTest::Schema::CD_to_Producer' => 'cd'
-);
-
-__PACKAGE__->might_have(
-    liner_notes => 'DBICTest::Schema::LinerNotes', undef,
-    { proxy => [ qw/notes/ ] },
-);
-__PACKAGE__->might_have(artwork => 'DBICTest::Schema::Artwork', 'cd_id');
-__PACKAGE__->has_one(mandatory_artwork => 'DBICTest::Schema::Artwork', 'cd_id');
-
-__PACKAGE__->many_to_many( producers => cd_to_producer => 'producer' );
-__PACKAGE__->many_to_many(
-    producers_sorted => cd_to_producer => 'producer',
-    { order_by => 'producer.name' },
-);
-
-__PACKAGE__->belongs_to('genre', 'DBICTest::Schema::Genre',
-    { 'foreign.genreid' => 'self.genreid' },
-    {
-        join_type => 'left',
-        on_delete => 'SET NULL',
-        on_update => 'CASCADE',
-    },
-);
-
-#This second relationship was added to test the short-circuiting of pointless
-#queries provided by undef_on_null_fk. the relevant test in 66relationship.t
-__PACKAGE__->belongs_to('genre_inefficient', 'DBICTest::Schema::Genre',
-    { 'foreign.genreid' => 'self.genreid' },
-    {
-        join_type => 'left',
-        on_delete => 'SET NULL',
-        on_update => 'CASCADE',
-        undef_on_null_fk => 0,
-    },
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/CD_to_Producer.pm b/t/lib/DBICTest/Schema/CD_to_Producer.pm
deleted file mode 100644
index f0f14f0..0000000
--- a/t/lib/DBICTest/Schema/CD_to_Producer.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::CD_to_Producer;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('cd_to_producer');
-__PACKAGE__->add_columns(
-  cd => { data_type => 'integer' },
-  producer => { data_type => 'integer' },
-  attribute => { data_type => 'integer', is_nullable => 1 },
-);
-__PACKAGE__->set_primary_key(qw/cd producer/);
-
-__PACKAGE__->belongs_to(
-  'cd', 'DBICTest::Schema::CD',
-  { 'foreign.cdid' => 'self.cd' }
-);
-
-__PACKAGE__->belongs_to(
-  'producer', 'DBICTest::Schema::Producer',
-  { 'foreign.producerid' => 'self.producer' },
-  { on_delete => undef, on_update => undef },
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/Collection.pm b/t/lib/DBICTest/Schema/Collection.pm
deleted file mode 100644
index 96f6399..0000000
--- a/t/lib/DBICTest/Schema/Collection.pm
+++ /dev/null
@@ -1,30 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Collection;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('collection');
-__PACKAGE__->add_columns(
-  'collectionid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-);
-__PACKAGE__->set_primary_key('collectionid');
-
-__PACKAGE__->has_many( collection_object => "DBICTest::Schema::CollectionObject",
-                       { "foreign.collection" => "self.collectionid" }
-                     );
-__PACKAGE__->many_to_many( objects => collection_object => "object" );
-__PACKAGE__->many_to_many( pointy_objects => collection_object => "object",
-                           { where => { "object.type" => "pointy" } }
-                         );
-__PACKAGE__->many_to_many( round_objects => collection_object => "object",
-                           { where => { "object.type" => "round" } } 
-                         );
-
-1;
diff --git a/t/lib/DBICTest/Schema/CollectionObject.pm b/t/lib/DBICTest/Schema/CollectionObject.pm
deleted file mode 100644
index 446909c..0000000
--- a/t/lib/DBICTest/Schema/CollectionObject.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::CollectionObject;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('collection_object');
-__PACKAGE__->add_columns(
-  'collection' => {
-    data_type => 'integer',
-  },
-  'object' => {
-    data_type => 'integer',
-  },
-);
-__PACKAGE__->set_primary_key(qw/collection object/);
-
-__PACKAGE__->belongs_to( collection => "DBICTest::Schema::Collection",
-                         { "foreign.collectionid" => "self.collection" }
-                       );
-__PACKAGE__->belongs_to( object => "DBICTest::Schema::TypedObject",
-                         { "foreign.objectid" => "self.object" }
-                       );
-
-1;
diff --git a/t/lib/DBICTest/Schema/ComputedColumn.pm b/t/lib/DBICTest/Schema/ComputedColumn.pm
deleted file mode 100644
index 6832b3e..0000000
--- a/t/lib/DBICTest/Schema/ComputedColumn.pm
+++ /dev/null
@@ -1,34 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::ComputedColumn;
-
-# for sybase and mssql computed column tests
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('computed_column_test');
-
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'a_computed_column' => {
-    data_type => undef,
-    is_nullable => 0,
-    default_value => \'getdate()',
-  },
-  'a_timestamp' => {
-    data_type => 'timestamp',
-    is_nullable => 0,
-  },
-  'charfield' => {
-    data_type => 'varchar',
-    size => 20,
-    default_value => 'foo',
-    is_nullable => 0,
-  }
-);
-
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/CustomSql.pm b/t/lib/DBICTest/Schema/CustomSql.pm
deleted file mode 100644
index bdad8b8..0000000
--- a/t/lib/DBICTest/Schema/CustomSql.pm
+++ /dev/null
@@ -1,17 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::CustomSql;
-
-use base qw/DBICTest::Schema::Artist/;
-
-__PACKAGE__->table('dummy');
-
-__PACKAGE__->result_source_instance->name(\<<SQL);
-  ( SELECT a.*, cd.cdid AS cdid, cd.title AS title, cd.year AS year 
-  FROM artist a
-  JOIN cd ON cd.artist = a.artistid
-  WHERE cd.year = ?)
-SQL
-
-sub sqlt_deploy_hook { $_[1]->schema->drop_table($_[1]) }
-
-1;
diff --git a/t/lib/DBICTest/Schema/Dummy.pm b/t/lib/DBICTest/Schema/Dummy.pm
deleted file mode 100644
index 2a8396d..0000000
--- a/t/lib/DBICTest/Schema/Dummy.pm
+++ /dev/null
@@ -1,23 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Dummy;
-
-use base qw/DBICTest::BaseResult/;
-
-use strict;
-use warnings;
-
-__PACKAGE__->table('dummy');
-__PACKAGE__->add_columns(
-    'id' => {
-        data_type => 'integer',
-        is_auto_increment => 1
-    },
-    'gittery' => {
-        data_type => 'varchar',
-        size      => 100,
-        is_nullable => 1,
-    },
-);
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Employee.pm b/t/lib/DBICTest/Schema/Employee.pm
deleted file mode 100644
index 9bf015a..0000000
--- a/t/lib/DBICTest/Schema/Employee.pm
+++ /dev/null
@@ -1,49 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Employee;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->load_components(qw( Ordered ));
-
-__PACKAGE__->table('employee');
-
-__PACKAGE__->add_columns(
-    employee_id => {
-        data_type => 'integer',
-        is_auto_increment => 1
-    },
-    position => {
-        data_type => 'integer',
-    },
-    group_id => {
-        data_type => 'integer',
-        is_nullable => 1,
-    },
-    group_id_2 => {
-        data_type => 'integer',
-        is_nullable => 1,
-    },
-    group_id_3 => {
-        data_type => 'integer',
-        is_nullable => 1,
-    },
-    name => {
-        data_type => 'varchar',
-        size      => 100,
-        is_nullable => 1,
-    },
-);
-
-__PACKAGE__->set_primary_key('employee_id');
-__PACKAGE__->position_column('position');
-
-#__PACKAGE__->add_unique_constraint(position_group => [ qw/position group_id/ ]);
-
-__PACKAGE__->mk_classdata('field_name_for', {
-    employee_id => 'primary key',
-    position    => 'list position',
-    group_id    => 'collection column',
-    name        => 'employee name',
-});
-
-1;
diff --git a/t/lib/DBICTest/Schema/Encoded.pm b/t/lib/DBICTest/Schema/Encoded.pm
deleted file mode 100644
index 7fd77dc..0000000
--- a/t/lib/DBICTest/Schema/Encoded.pm
+++ /dev/null
@@ -1,39 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Encoded;
-
-use base qw/DBICTest::BaseResult/;
-
-use strict;
-use warnings;
-
-__PACKAGE__->table('encoded');
-__PACKAGE__->add_columns(
-    'id' => {
-        data_type => 'integer',
-        is_auto_increment => 1
-    },
-    'encoded' => {
-        data_type => 'varchar',
-        size      => 100,
-        is_nullable => 1,
-    },
-);
-
-__PACKAGE__->set_primary_key('id');
-
-sub set_column {
-  my ($self, $col, $value) = @_;
-  if( $col eq 'encoded' ){
-    $value = reverse split '', $value;
-  }
-  $self->next::method($col, $value);
-}
-
-sub new {
-  my($self, $attr, @rest) = @_;
-  $attr->{encoded} = reverse split '', $attr->{encoded}
-    if defined $attr->{encoded};
-  return $self->next::method($attr, @rest);
-}
-
-1;
diff --git a/t/lib/DBICTest/Schema/Event.pm b/t/lib/DBICTest/Schema/Event.pm
deleted file mode 100644
index 22b655e..0000000
--- a/t/lib/DBICTest/Schema/Event.pm
+++ /dev/null
@@ -1,23 +0,0 @@
-package DBICTest::Schema::Event;
-
-use strict;
-use warnings;
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
-
-__PACKAGE__->table('event');
-
-__PACKAGE__->add_columns(
-  id => { data_type => 'integer', is_auto_increment => 1 },
-  starts_at => { data_type => 'datetime' },
-  created_on => { data_type => 'timestamp' },
-  varchar_date => { data_type => 'varchar', inflate_date => 1, size => 20, is_nullable => 1 },
-  varchar_datetime => { data_type => 'varchar', inflate_datetime => 1, size => 20, is_nullable => 1 },
-  skip_inflation => { data_type => 'datetime', inflate_datetime => 0, is_nullable => 1 },
-  ts_without_tz => { data_type => 'datetime', is_nullable => 1 }, # used in EventTZPg
-);
-
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/EventTZ.pm b/t/lib/DBICTest/Schema/EventTZ.pm
deleted file mode 100644
index 2d8df28..0000000
--- a/t/lib/DBICTest/Schema/EventTZ.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package DBICTest::Schema::EventTZ;
-
-use strict;
-use warnings;
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
-
-__PACKAGE__->table('event');
-
-__PACKAGE__->add_columns(
-  id => { data_type => 'integer', is_auto_increment => 1 },
-  starts_at => { data_type => 'datetime', timezone => "America/Chicago", locale => 'de_DE', datetime_undef_if_invalid => 1 },
-  created_on => { data_type => 'timestamp', timezone => "America/Chicago", floating_tz_ok => 1 },
-);
-
-__PACKAGE__->set_primary_key('id');
-
-sub _datetime_parser {
-  require DateTime::Format::MySQL;
-  DateTime::Format::MySQL->new();
-}
-
-1;
diff --git a/t/lib/DBICTest/Schema/EventTZDeprecated.pm b/t/lib/DBICTest/Schema/EventTZDeprecated.pm
deleted file mode 100644
index a667976..0000000
--- a/t/lib/DBICTest/Schema/EventTZDeprecated.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package DBICTest::Schema::EventTZDeprecated;
-
-use strict;
-use warnings;
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
-
-__PACKAGE__->table('event');
-
-__PACKAGE__->add_columns(
-  id => { data_type => 'integer', is_auto_increment => 1 },
-  starts_at => { data_type => 'datetime', extra => { timezone => "America/Chicago", locale => 'de_DE' } },
-  created_on => { data_type => 'timestamp', extra => { timezone => "America/Chicago", floating_tz_ok => 1 } },
-);
-
-__PACKAGE__->set_primary_key('id');
-
-sub _datetime_parser {
-  require DateTime::Format::MySQL;
-  DateTime::Format::MySQL->new();
-}
-
-
-1;
diff --git a/t/lib/DBICTest/Schema/EventTZPg.pm b/t/lib/DBICTest/Schema/EventTZPg.pm
deleted file mode 100644
index 444fe69..0000000
--- a/t/lib/DBICTest/Schema/EventTZPg.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package DBICTest::Schema::EventTZPg;
-
-use strict;
-use warnings;
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->load_components(qw/InflateColumn::DateTime/);
-
-__PACKAGE__->table('event');
-
-__PACKAGE__->add_columns(
-  id => { data_type => 'integer', is_auto_increment => 1 },
-  starts_at => { data_type => 'datetime', timezone => "America/Chicago", locale => 'de_DE' },
-  created_on => { data_type => 'timestamp with time zone', timezone => "America/Chicago" },
-  ts_without_tz => { data_type => 'timestamp without time zone' },
-);
-
-__PACKAGE__->set_primary_key('id');
-
-sub _datetime_parser {
-  require DateTime::Format::Pg;
-  DateTime::Format::Pg->new();
-}
-
-1;
diff --git a/t/lib/DBICTest/Schema/FileColumn.pm b/t/lib/DBICTest/Schema/FileColumn.pm
deleted file mode 100644
index 82fcebd..0000000
--- a/t/lib/DBICTest/Schema/FileColumn.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package 
-DBICTest::Schema::FileColumn;
-
-use strict;
-use warnings;
-use base qw/DBICTest::BaseResult/;
-use File::Temp qw/tempdir/;
-
-__PACKAGE__->load_components(qw/InflateColumn::File/);
-
-__PACKAGE__->table('file_columns');
-
-__PACKAGE__->add_columns(
-  id => { data_type => 'integer', is_auto_increment => 1 },
-  file => {
-    data_type        => 'varchar',
-    is_file_column   => 1,
-    file_column_path => tempdir(CLEANUP => 1),
-    size             => 255
-  }
-);
-
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/ForceForeign.pm b/t/lib/DBICTest/Schema/ForceForeign.pm
deleted file mode 100644
index 8e2daeb..0000000
--- a/t/lib/DBICTest/Schema/ForceForeign.pm
+++ /dev/null
@@ -1,41 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::ForceForeign;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('forceforeign');
-__PACKAGE__->add_columns(
-  'artist' => { data_type => 'integer' },
-  'cd' => { data_type => 'integer' },
-);
-__PACKAGE__->set_primary_key(qw/artist/);
-
-# Normally this would not appear as a FK constraint
-# since it uses the PK
-__PACKAGE__->might_have(
-			'artist_1', 'DBICTest::Schema::Artist', {
-			    'foreign.artistid' => 'self.artist',
-			}, {
-			    is_foreign_key_constraint => 1,
-			},
-);
-
-# Normally this would appear as a FK constraint
-__PACKAGE__->might_have(
-			'cd_1', 'DBICTest::Schema::CD', {
-			    'foreign.cdid' => 'self.cd',
-			}, {
-			    is_foreign_key_constraint => 0,
-			},
-);
-
-# Normally this would appear as a FK constraint
-__PACKAGE__->belongs_to(
-			'cd_3', 'DBICTest::Schema::CD', {
-			    'foreign.cdid' => 'self.cd',
-			}, {
-			    is_foreign_key_constraint => 0,
-			},
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/FourKeys.pm b/t/lib/DBICTest/Schema/FourKeys.pm
deleted file mode 100644
index 9966cfb..0000000
--- a/t/lib/DBICTest/Schema/FourKeys.pm
+++ /dev/null
@@ -1,29 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::FourKeys;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('fourkeys');
-__PACKAGE__->add_columns(
-  'foo' => { data_type => 'integer' },
-  'bar' => { data_type => 'integer' },
-  'hello' => { data_type => 'integer' },
-  'goodbye' => { data_type => 'integer' },
-  'sensors' => { data_type => 'character', size => 10 },
-  'read_count' => { data_type => 'integer', is_nullable => 1 },
-);
-__PACKAGE__->set_primary_key(qw/foo bar hello goodbye/);
-
-__PACKAGE__->has_many(
-  'fourkeys_to_twokeys', 'DBICTest::Schema::FourKeys_to_TwoKeys', {
-    'foreign.f_foo' => 'self.foo',
-    'foreign.f_bar' => 'self.bar',
-    'foreign.f_hello' => 'self.hello',
-    'foreign.f_goodbye' => 'self.goodbye',
-});
-
-__PACKAGE__->many_to_many(
-  'twokeys', 'fourkeys_to_twokeys', 'twokeys',
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/FourKeys_to_TwoKeys.pm b/t/lib/DBICTest/Schema/FourKeys_to_TwoKeys.pm
deleted file mode 100644
index d95ed6c..0000000
--- a/t/lib/DBICTest/Schema/FourKeys_to_TwoKeys.pm
+++ /dev/null
@@ -1,33 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::FourKeys_to_TwoKeys;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('fourkeys_to_twokeys');
-__PACKAGE__->add_columns(
-  'f_foo' => { data_type => 'integer' },
-  'f_bar' => { data_type => 'integer' },
-  'f_hello' => { data_type => 'integer' },
-  'f_goodbye' => { data_type => 'integer' },
-  't_artist' => { data_type => 'integer' },
-  't_cd' => { data_type => 'integer' },
-  'autopilot' => { data_type => 'character' },
-  'pilot_sequence' => { data_type => 'integer', is_nullable => 1 },
-);
-__PACKAGE__->set_primary_key(
-  qw/f_foo f_bar f_hello f_goodbye t_artist t_cd/
-);
-
-__PACKAGE__->belongs_to('fourkeys', 'DBICTest::Schema::FourKeys', {
-  'foreign.foo' => 'self.f_foo',
-  'foreign.bar' => 'self.f_bar',
-  'foreign.hello' => 'self.f_hello',
-  'foreign.goodbye' => 'self.f_goodbye',
-});
-
-__PACKAGE__->belongs_to('twokeys', 'DBICTest::Schema::TwoKeys', {
-  'foreign.artist' => 'self.t_artist',
-  'foreign.cd' => 'self.t_cd',
-});
-
-1;
diff --git a/t/lib/DBICTest/Schema/Genre.pm b/t/lib/DBICTest/Schema/Genre.pm
deleted file mode 100644
index dceabc9..0000000
--- a/t/lib/DBICTest/Schema/Genre.pm
+++ /dev/null
@@ -1,25 +0,0 @@
-package DBICTest::Schema::Genre;
-
-use strict;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('genre');
-__PACKAGE__->add_columns(
-    genreid => {
-      data_type => 'integer',
-      is_auto_increment => 1,
-    },
-    name => {
-      data_type => 'varchar',
-      size => 100,
-    },
-);
-__PACKAGE__->set_primary_key('genreid');
-__PACKAGE__->add_unique_constraint ( genre_name => [qw/name/] );
-
-__PACKAGE__->has_many (cds => 'DBICTest::Schema::CD', 'genreid');
-
-__PACKAGE__->has_one (model_cd => 'DBICTest::Schema::CD', 'genreid');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Image.pm b/t/lib/DBICTest/Schema/Image.pm
deleted file mode 100644
index 16f94a9..0000000
--- a/t/lib/DBICTest/Schema/Image.pm
+++ /dev/null
@@ -1,28 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Image;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('images');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'artwork_id' => {
-    data_type => 'integer',
-    is_foreign_key => 1,
-  },
-  'name' => {
-    data_type => 'varchar',
-    size => 100,
-  },
-  'data' => {
-    data_type => 'blob',
-    is_nullable => 1,
-  },
-);
-__PACKAGE__->set_primary_key('id');
-__PACKAGE__->belongs_to('artwork', 'DBICTest::Schema::Artwork', 'artwork_id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/LinerNotes.pm b/t/lib/DBICTest/Schema/LinerNotes.pm
deleted file mode 100644
index 5675f52..0000000
--- a/t/lib/DBICTest/Schema/LinerNotes.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::LinerNotes;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('liner_notes');
-__PACKAGE__->add_columns(
-  'liner_id' => {
-    data_type => 'integer',
-  },
-  'notes' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-);
-__PACKAGE__->set_primary_key('liner_id');
-__PACKAGE__->belongs_to(
-  'cd', 'DBICTest::Schema::CD', 'liner_id'
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/Link.pm b/t/lib/DBICTest/Schema/Link.pm
deleted file mode 100644
index 19b7aa0..0000000
--- a/t/lib/DBICTest/Schema/Link.pm
+++ /dev/null
@@ -1,32 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Link;
-
-use base qw/DBICTest::BaseResult/;
-
-use strict;
-use warnings;
-
-__PACKAGE__->table('link');
-__PACKAGE__->add_columns(
-    'id' => {
-        data_type => 'integer',
-        is_auto_increment => 1
-    },
-    'url' => {
-        data_type => 'varchar',
-        size      => 100,
-        is_nullable => 1,
-    },
-    'title' => {
-        data_type => 'varchar',
-        size      => 100,
-        is_nullable => 1,
-    },
-);
-__PACKAGE__->set_primary_key('id');
-
-__PACKAGE__->has_many ( bookmarks => 'DBICTest::Schema::Bookmark', 'link', { cascade_delete => 0 } );
-
-use overload '""' => sub { shift->url }, fallback=> 1;
-
-1;
diff --git a/t/lib/DBICTest/Schema/LyricVersion.pm b/t/lib/DBICTest/Schema/LyricVersion.pm
deleted file mode 100644
index 2a409ab..0000000
--- a/t/lib/DBICTest/Schema/LyricVersion.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::LyricVersion;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('lyric_versions');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'lyric_id' => {
-    data_type => 'integer',
-    is_foreign_key => 1,
-  },
-  'text' => {
-    data_type => 'varchar',
-    size => 100,
-  },
-);
-__PACKAGE__->set_primary_key('id');
-__PACKAGE__->belongs_to('lyric', 'DBICTest::Schema::Lyrics', 'lyric_id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Lyrics.pm b/t/lib/DBICTest/Schema/Lyrics.pm
deleted file mode 100644
index 268a553..0000000
--- a/t/lib/DBICTest/Schema/Lyrics.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Lyrics;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('lyrics');
-__PACKAGE__->add_columns(
-  'lyric_id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'track_id' => {
-    data_type => 'integer',
-    is_foreign_key => 1,
-  },
-);
-__PACKAGE__->set_primary_key('lyric_id');
-__PACKAGE__->belongs_to('track', 'DBICTest::Schema::Track', 'track_id');
-__PACKAGE__->has_many('lyric_versions', 'DBICTest::Schema::LyricVersion', 'lyric_id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Money.pm b/t/lib/DBICTest/Schema/Money.pm
deleted file mode 100644
index f4586eb..0000000
--- a/t/lib/DBICTest/Schema/Money.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Money;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('money_test');
-
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'amount' => {
-    data_type => 'money',
-    is_nullable => 1,
-  },
-);
-
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/NoPrimaryKey.pm b/t/lib/DBICTest/Schema/NoPrimaryKey.pm
deleted file mode 100644
index cb79178..0000000
--- a/t/lib/DBICTest/Schema/NoPrimaryKey.pm
+++ /dev/null
@@ -1,15 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::NoPrimaryKey;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('noprimarykey');
-__PACKAGE__->add_columns(
-  'foo' => { data_type => 'integer' },
-  'bar' => { data_type => 'integer' },
-  'baz' => { data_type => 'integer' },
-);
-
-__PACKAGE__->add_unique_constraint(foo_bar => [ qw/foo bar/ ]);
-
-1;
diff --git a/t/lib/DBICTest/Schema/NoSuchClass.pm b/t/lib/DBICTest/Schema/NoSuchClass.pm
deleted file mode 100644
index 2730b3a..0000000
--- a/t/lib/DBICTest/Schema/NoSuchClass.pm
+++ /dev/null
@@ -1,6 +0,0 @@
-package DBICTest::Schema::NoSuchClass;
-
-## This is purposefully not a real DBIC class
-## Used in t/102load_classes.t
-
-1;
diff --git a/t/lib/DBICTest/Schema/OneKey.pm b/t/lib/DBICTest/Schema/OneKey.pm
deleted file mode 100644
index bd0e148..0000000
--- a/t/lib/DBICTest/Schema/OneKey.pm
+++ /dev/null
@@ -1,22 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::OneKey;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('onekey');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'artist' => {
-    data_type => 'integer',
-  },
-  'cd' => {
-    data_type => 'integer',
-  },
-);
-__PACKAGE__->set_primary_key('id');
-
-
-1;
diff --git a/t/lib/DBICTest/Schema/Owners.pm b/t/lib/DBICTest/Schema/Owners.pm
deleted file mode 100644
index 70af33c..0000000
--- a/t/lib/DBICTest/Schema/Owners.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Owners;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('owners');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => '100',
-  },
-);
-__PACKAGE__->set_primary_key('id');
-
-__PACKAGE__->has_many(books => "DBICTest::Schema::BooksInLibrary", "owner");
-
-1;
diff --git a/t/lib/DBICTest/Schema/Producer.pm b/t/lib/DBICTest/Schema/Producer.pm
deleted file mode 100644
index c2fa611..0000000
--- a/t/lib/DBICTest/Schema/Producer.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Producer;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('producer');
-__PACKAGE__->add_columns(
-  'producerid' => {
-    data_type => 'integer',
-    is_auto_increment => 1
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-);
-__PACKAGE__->set_primary_key('producerid');
-__PACKAGE__->add_unique_constraint(prod_name => [ qw/name/ ]);
-
-__PACKAGE__->has_many(
-    producer_to_cd => 'DBICTest::Schema::CD_to_Producer' => 'producer'
-);
-__PACKAGE__->many_to_many('cds', 'producer_to_cd', 'cd');
-1;
diff --git a/t/lib/DBICTest/Schema/SelfRef.pm b/t/lib/DBICTest/Schema/SelfRef.pm
deleted file mode 100644
index c0e1476..0000000
--- a/t/lib/DBICTest/Schema/SelfRef.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::SelfRef;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('self_ref');
-__PACKAGE__->add_columns(
-  'id' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-);
-__PACKAGE__->set_primary_key('id');
-
-__PACKAGE__->has_many( aliases => 'DBICTest::Schema::SelfRefAlias' => 'self_ref' );
-
-1;
diff --git a/t/lib/DBICTest/Schema/SelfRefAlias.pm b/t/lib/DBICTest/Schema/SelfRefAlias.pm
deleted file mode 100644
index 40e181f..0000000
--- a/t/lib/DBICTest/Schema/SelfRefAlias.pm
+++ /dev/null
@@ -1,20 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::SelfRefAlias;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('self_ref_alias');
-__PACKAGE__->add_columns(
-  'self_ref' => {
-    data_type => 'integer',
-  },
-  'alias' => {
-    data_type => 'integer',
-  },
-);
-__PACKAGE__->set_primary_key(qw/self_ref alias/);
-
-__PACKAGE__->belongs_to( self_ref => 'DBICTest::Schema::SelfRef' );
-__PACKAGE__->belongs_to( alias => 'DBICTest::Schema::SelfRef' );
-
-1;
diff --git a/t/lib/DBICTest/Schema/SequenceTest.pm b/t/lib/DBICTest/Schema/SequenceTest.pm
deleted file mode 100644
index b0fa515..0000000
--- a/t/lib/DBICTest/Schema/SequenceTest.pm
+++ /dev/null
@@ -1,37 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::SequenceTest;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('sequence_test');
-__PACKAGE__->source_info({
-    "source_info_key_A" => "source_info_value_A",
-    "source_info_key_B" => "source_info_value_B",
-    "source_info_key_C" => "source_info_value_C",
-    "source_info_key_D" => "source_info_value_D",
-});
-__PACKAGE__->add_columns(
-  'pkid1' => {
-    data_type => 'integer',
-    auto_nextval => 1,
-    sequence => 'pkid1_seq',
-  },
-  'pkid2' => {
-    data_type => 'integer',
-    auto_nextval => 1,
-    sequence => 'pkid2_seq',
-  },
-  'nonpkid' => {
-    data_type => 'integer',
-    auto_nextval => 1,
-    sequence => 'nonpkid_seq',
-  },
-  'name' => {
-    data_type => 'varchar',
-    size      => 100,
-    is_nullable => 1,
-  },
-);
-__PACKAGE__->set_primary_key('pkid1', 'pkid2');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Serialized.pm b/t/lib/DBICTest/Schema/Serialized.pm
deleted file mode 100644
index d7737bd..0000000
--- a/t/lib/DBICTest/Schema/Serialized.pm
+++ /dev/null
@@ -1,13 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Serialized;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('serialized');
-__PACKAGE__->add_columns(
-  'id' => { data_type => 'integer', is_auto_increment => 1 },
-  'serialized' => { data_type => 'text' },
-);
-__PACKAGE__->set_primary_key('id');
-
-1;
diff --git a/t/lib/DBICTest/Schema/Tag.pm b/t/lib/DBICTest/Schema/Tag.pm
deleted file mode 100644
index 796616e..0000000
--- a/t/lib/DBICTest/Schema/Tag.pm
+++ /dev/null
@@ -1,24 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Tag;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('tags');
-__PACKAGE__->add_columns(
-  'tagid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'cd' => {
-    data_type => 'integer',
-  },
-  'tag' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-);
-__PACKAGE__->set_primary_key('tagid');
-
-__PACKAGE__->belongs_to( cd => 'DBICTest::Schema::CD' );
-
-1;
diff --git a/t/lib/DBICTest/Schema/Track.pm b/t/lib/DBICTest/Schema/Track.pm
deleted file mode 100644
index 12f7296..0000000
--- a/t/lib/DBICTest/Schema/Track.pm
+++ /dev/null
@@ -1,66 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Track;
-
-use base qw/DBICTest::BaseResult/;
-__PACKAGE__->load_components(qw/InflateColumn::DateTime Ordered/);
-
-__PACKAGE__->table('track');
-__PACKAGE__->add_columns(
-  'trackid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'cd' => {
-    data_type => 'integer',
-  },
-  'position' => {
-    data_type => 'int',
-    accessor => 'pos',
-  },
-  'title' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-  last_updated_on => {
-    data_type => 'datetime',
-    accessor => 'updated_date',
-    is_nullable => 1
-  },
-  last_updated_at => {
-    data_type => 'datetime',
-    is_nullable => 1
-  },
-  small_dt => { # for mssql and sybase DT tests
-    data_type => 'smalldatetime',
-    is_nullable => 1
-  },
-);
-__PACKAGE__->set_primary_key('trackid');
-
-__PACKAGE__->add_unique_constraint([ qw/cd position/ ]);
-__PACKAGE__->add_unique_constraint([ qw/cd title/ ]);
-
-__PACKAGE__->position_column ('position');
-__PACKAGE__->grouping_column ('cd');
-
-
-__PACKAGE__->belongs_to( cd => 'DBICTest::Schema::CD' );
-__PACKAGE__->belongs_to( disc => 'DBICTest::Schema::CD' => 'cd');
-
-__PACKAGE__->might_have( cd_single => 'DBICTest::Schema::CD', 'single_track' );
-__PACKAGE__->might_have( lyrics => 'DBICTest::Schema::Lyrics', 'track_id' );
-
-__PACKAGE__->belongs_to(
-    "year1999cd",
-    "DBICTest::Schema::Year1999CDs",
-    { "foreign.cdid" => "self.cd" },
-    { join_type => 'left' },  # the relationship is of course optional
-);
-__PACKAGE__->belongs_to(
-    "year2000cd",
-    "DBICTest::Schema::Year2000CDs",
-    { "foreign.cdid" => "self.cd" },
-    { join_type => 'left' },
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/TreeLike.pm b/t/lib/DBICTest/Schema/TreeLike.pm
deleted file mode 100644
index a5413d1..0000000
--- a/t/lib/DBICTest/Schema/TreeLike.pm
+++ /dev/null
@@ -1,28 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::TreeLike;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('treelike');
-__PACKAGE__->add_columns(
-  'id' => { data_type => 'integer', is_auto_increment => 1 },
-  'parent' => { data_type => 'integer' , is_nullable=>1},
-  'name' => { data_type => 'varchar',
-    size      => 100,
- },
-);
-__PACKAGE__->set_primary_key(qw/id/);
-__PACKAGE__->belongs_to('parent', 'TreeLike',
-                          { 'foreign.id' => 'self.parent' });
-__PACKAGE__->has_many('children', 'TreeLike', { 'foreign.parent' => 'self.id' });
-
-## since this is a self referential table we need to do a post deploy hook and get
-## some data in while constraints are off
-
- sub sqlt_deploy_hook {
-   my ($self, $sqlt_table) = @_;
-
-   ## We don't seem to need this anymore, but keeping it for the moment
-   ## $sqlt_table->add_index(name => 'idx_name', fields => ['name']);
- }
-1;
diff --git a/t/lib/DBICTest/Schema/TwoKeyTreeLike.pm b/t/lib/DBICTest/Schema/TwoKeyTreeLike.pm
deleted file mode 100644
index 1ee8409..0000000
--- a/t/lib/DBICTest/Schema/TwoKeyTreeLike.pm
+++ /dev/null
@@ -1,21 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::TwoKeyTreeLike;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('twokeytreelike');
-__PACKAGE__->add_columns(
-  'id1' => { data_type => 'integer' },
-  'id2' => { data_type => 'integer' },
-  'parent1' => { data_type => 'integer' },
-  'parent2' => { data_type => 'integer' },
-  'name' => { data_type => 'varchar',
-    size      => 100,
- },
-);
-__PACKAGE__->set_primary_key(qw/id1 id2/);
-__PACKAGE__->add_unique_constraint('tktlnameunique' => ['name']);
-__PACKAGE__->belongs_to('parent', 'DBICTest::Schema::TwoKeyTreeLike',
-                          { 'foreign.id1' => 'self.parent1', 'foreign.id2' => 'self.parent2'});
-
-1;
diff --git a/t/lib/DBICTest/Schema/TwoKeys.pm b/t/lib/DBICTest/Schema/TwoKeys.pm
deleted file mode 100644
index bfb6c42..0000000
--- a/t/lib/DBICTest/Schema/TwoKeys.pm
+++ /dev/null
@@ -1,30 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::TwoKeys;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('twokeys');
-__PACKAGE__->add_columns(
-  'artist' => { data_type => 'integer' },
-  'cd' => { data_type => 'integer' },
-);
-__PACKAGE__->set_primary_key(qw/artist cd/);
-
-__PACKAGE__->belongs_to(
-    artist => 'DBICTest::Schema::Artist',
-    {'foreign.artistid'=>'self.artist'},
-);
-
-__PACKAGE__->belongs_to( cd => 'DBICTest::Schema::CD', undef, { is_deferrable => 0, add_fk_index => 0 } );
-
-__PACKAGE__->has_many(
-  'fourkeys_to_twokeys', 'DBICTest::Schema::FourKeys_to_TwoKeys', {
-    'foreign.t_artist' => 'self.artist',
-    'foreign.t_cd' => 'self.cd',
-});
-
-__PACKAGE__->many_to_many(
-  'fourkeys', 'fourkeys_to_twokeys', 'fourkeys',
-);
-
-1;
diff --git a/t/lib/DBICTest/Schema/TypedObject.pm b/t/lib/DBICTest/Schema/TypedObject.pm
deleted file mode 100644
index 50c5e44..0000000
--- a/t/lib/DBICTest/Schema/TypedObject.pm
+++ /dev/null
@@ -1,28 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::TypedObject;
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table('typed_object');
-__PACKAGE__->add_columns(
-  'objectid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'type' => {
-    data_type => 'varchar',
-    size      => '100',
-  },
-  'value' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-);
-__PACKAGE__->set_primary_key('objectid');
-
-__PACKAGE__->has_many( collection_object => "DBICTest::Schema::CollectionObject",
-                       { "foreign.object" => "self.objectid" }
-                     );
-__PACKAGE__->many_to_many( collections => collection_object => "collection" );
-
-1;
diff --git a/t/lib/DBICTest/Schema/Year1999CDs.pm b/t/lib/DBICTest/Schema/Year1999CDs.pm
deleted file mode 100644
index 76606d4..0000000
--- a/t/lib/DBICTest/Schema/Year1999CDs.pm
+++ /dev/null
@@ -1,39 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Schema::Year1999CDs;
-## Used in 104view.t
-
-use base qw/DBICTest::BaseResult/;
-
-__PACKAGE__->table_class('DBIx::Class::ResultSource::View');
-
-__PACKAGE__->table('year1999cds');
-__PACKAGE__->result_source_instance->is_virtual(1);
-__PACKAGE__->result_source_instance->view_definition(
-  "SELECT cdid, artist, title, single_track FROM cd WHERE year ='1999'"
-);
-__PACKAGE__->add_columns(
-  'cdid' => {
-    data_type => 'integer',
-    is_auto_increment => 1,
-  },
-  'artist' => {
-    data_type => 'integer',
-  },
-  'title' => {
-    data_type => 'varchar',
-    size      => 100,
-  },
-  'single_track' => {
-    data_type => 'integer',
-    is_nullable => 1,
-    is_foreign_key => 1,
-  },
-);
-__PACKAGE__->set_primary_key('cdid');
-__PACKAGE__->add_unique_constraint([ qw/artist title/ ]);
-
-__PACKAGE__->belongs_to( artist => 'DBICTest::Schema::Artist' );
-__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track',
-    { "foreign.cd" => "self.cdid" });
-
-1;
diff --git a/t/lib/DBICTest/Schema/Year2000CDs.pm b/t/lib/DBICTest/Schema/Year2000CDs.pm
deleted file mode 100644
index 2fc30aa..0000000
--- a/t/lib/DBICTest/Schema/Year2000CDs.pm
+++ /dev/null
@@ -1,19 +0,0 @@
-package # hide from PAUSE
-    DBICTest::Schema::Year2000CDs;
-
-use base qw/DBICTest::Schema::CD/;
-
-__PACKAGE__->table_class('DBIx::Class::ResultSource::View');
-__PACKAGE__->table('year2000cds');
-
-# need to operate on the instance for things to work
-__PACKAGE__->result_source_instance->view_definition( sprintf (
-  'SELECT %s FROM cd WHERE year = "2000"',
-  join (', ', __PACKAGE__->columns),
-));
-
-__PACKAGE__->belongs_to( artist => 'DBICTest::Schema::Artist' );
-__PACKAGE__->has_many( tracks => 'DBICTest::Schema::Track',
-    { "foreign.cd" => "self.cdid" });
-
-1;
diff --git a/t/lib/DBICTest/Stats.pm b/t/lib/DBICTest/Stats.pm
deleted file mode 100644
index 5a4544f..0000000
--- a/t/lib/DBICTest/Stats.pm
+++ /dev/null
@@ -1,63 +0,0 @@
-package DBICTest::Stats;
-use strict;
-use warnings;
-
-use base qw/DBIx::Class::Storage::Statistics/;
-
-sub txn_begin {
-  my $self = shift;
-
-  $self->{'TXN_BEGIN'}++;
-  return $self->{'TXN_BEGIN'};
-}
-
-sub txn_rollback {
-  my $self = shift;
-
-  $self->{'TXN_ROLLBACK'}++;
-  return $self->{'TXN_ROLLBACK'};
-}
-
-sub txn_commit {
-  my $self = shift;
-
-  $self->{'TXN_COMMIT'}++;
-  return $self->{'TXN_COMMIT'};
-}
-
-sub svp_begin {
-  my ($self, $name) = @_;
-
-  $self->{'SVP_BEGIN'}++;
-  return $self->{'SVP_BEGIN'};
-}
-
-sub svp_release {
-  my ($self, $name) = @_;
-
-  $self->{'SVP_RELEASE'}++;
-  return $self->{'SVP_RELEASE'};
-}
-
-sub svp_rollback {
-  my ($self, $name) = @_;
-
-  $self->{'SVP_ROLLBACK'}++;
-  return $self->{'SVP_ROLLBACK'};
-}
-
-sub query_start {
-  my ($self, $string, @bind) = @_;
-
-  $self->{'QUERY_START'}++;
-  return $self->{'QUERY_START'};
-}
-
-sub query_end {
-  my ($self, $string) = @_;
-
-  $self->{'QUERY_END'}++;
-  return $self->{'QUERY_START'};
-}
-
-1;
diff --git a/t/lib/DBICTest/SyntaxErrorComponent1.pm b/t/lib/DBICTest/SyntaxErrorComponent1.pm
deleted file mode 100644
index 3fb5045..0000000
--- a/t/lib/DBICTest/SyntaxErrorComponent1.pm
+++ /dev/null
@@ -1,9 +0,0 @@
-#   belongs to t/run/90ensure_class_loaded.tl
-package # hide from PAUSE 
-    DBICTest::SyntaxErrorComponent1;
-use warnings;
-use strict;
-
-my $str ''; # syntax error
-
-1;
diff --git a/t/lib/DBICTest/SyntaxErrorComponent2.pm b/t/lib/DBICTest/SyntaxErrorComponent2.pm
deleted file mode 100644
index ac6cfb8..0000000
--- a/t/lib/DBICTest/SyntaxErrorComponent2.pm
+++ /dev/null
@@ -1,9 +0,0 @@
-#   belongs to t/run/90ensure_class_loaded.tl
-package # hide from PAUSE 
-    DBICTest::SyntaxErrorComponent2;
-use warnings;
-use strict;
-
-my $str ''; # syntax error
-
-1;
diff --git a/t/lib/DBICTest/SyntaxErrorComponent3.pm b/t/lib/DBICTest/SyntaxErrorComponent3.pm
deleted file mode 100644
index 34f3c3f..0000000
--- a/t/lib/DBICTest/SyntaxErrorComponent3.pm
+++ /dev/null
@@ -1,5 +0,0 @@
-package DBICErrorTest::SyntaxError;
-
-use strict;
-
-I'm a syntax error!
diff --git a/t/lib/DBICTest/Taint/Classes/Auto.pm b/t/lib/DBICTest/Taint/Classes/Auto.pm
deleted file mode 100644
index 9a30c1a..0000000
--- a/t/lib/DBICTest/Taint/Classes/Auto.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Taint::Classes::Auto;
-
-use base 'DBIx::Class::Core';
-__PACKAGE__->table('test');
-
-1;
diff --git a/t/lib/DBICTest/Taint/Classes/Manual.pm b/t/lib/DBICTest/Taint/Classes/Manual.pm
deleted file mode 100644
index 5d2109b..0000000
--- a/t/lib/DBICTest/Taint/Classes/Manual.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Taint::Classes::Manual;
-
-use base 'DBIx::Class::Core';
-__PACKAGE__->table('test');
-
-1;
diff --git a/t/lib/DBICTest/Taint/Namespaces/Result/Test.pm b/t/lib/DBICTest/Taint/Namespaces/Result/Test.pm
deleted file mode 100644
index 7d57bb5..0000000
--- a/t/lib/DBICTest/Taint/Namespaces/Result/Test.pm
+++ /dev/null
@@ -1,7 +0,0 @@
-package # hide from PAUSE 
-    DBICTest::Taint::Namespaces::Result::Test;
-
-use base 'DBIx::Class::Core';
-__PACKAGE__->table('test');
-
-1;