X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat.pm;h=835adfe37f7fbcb094aad77d61aa4018f6387c5e;hb=d4daee7b54e38e4b3d3d0a77759bddc1a4ede6e5;hp=ec063a90409bbdf0599b944c77f475fbd3bae694;hpb=118edec6adaf70e29f6dd2ab231b52617f54d18e;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/CDBICompat.pm b/lib/DBIx/Class/CDBICompat.pm index ec063a9..835adfe 100644 --- a/lib/DBIx/Class/CDBICompat.pm +++ b/lib/DBIx/Class/CDBICompat.pm @@ -11,7 +11,7 @@ my @Extra_Modules = qw( DBIx::ContextualFetch Clone ); - + my @didnt_load; for my $module (@Extra_Modules) { push @didnt_load, $module unless eval qq{require $module}; @@ -149,13 +149,13 @@ Relationships between tables (has_a, has_many...) must be delcared after all tab package Foo; use base qw(Class::DBI); - + Foo->table("foo"); Foo->columns( All => qw(this that bar) ); package Bar; use base qw(Class::DBI); - + Bar->table("bar"); Bar->columns( All => qw(up down) );