X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat.pm;h=b4c6399daa5eba90b5be730300993fa1a28ca51c;hb=977f88cb4a2a252c91a6b4233bc4de59b702b9c1;hp=41160c0da306bc2b11631a68576bcdb9fa41f49e;hpb=48580715af3072905f2c71dc27e7f70f21a11338;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/CDBICompat.pm b/lib/DBIx/Class/CDBICompat.pm index 41160c0..b4c6399 100644 --- a/lib/DBIx/Class/CDBICompat.pm +++ b/lib/DBIx/Class/CDBICompat.pm @@ -3,7 +3,6 @@ package DBIx::Class::CDBICompat; use strict; use warnings; use base qw/DBIx::Class::Core DBIx::Class::DB/; -use Carp::Clan qw/^DBIx::Class/; # Modules CDBICompat needs that DBIx::Class does not. my @Extra_Modules = qw( @@ -16,7 +15,7 @@ my @didnt_load; for my $module (@Extra_Modules) { push @didnt_load, $module unless eval qq{require $module}; } -croak("@{[ join ', ', @didnt_load ]} are missing and are required for CDBICompat") +__PACKAGE__->throw_exception("@{[ join ', ', @didnt_load ]} are missing and are required for CDBICompat") if @didnt_load; @@ -63,7 +62,7 @@ DBIx::Class::CDBICompat - Class::DBI Compatibility layer. =head1 DESCRIPTION DBIx::Class features a fully featured compatibility layer with L -and some common plugins to ease transition for existing CDBI users. +and some common plugins to ease transition for existing CDBI users. This is not a wrapper or subclass of DBIx::Class but rather a series of plugins. The result being that even though you're using the Class::DBI emulation layer you are still getting DBIx::Class objects. You can use all DBIx::Class features and methods via CDBICompat. This allows you to take advantage of DBIx::Class features without having to rewrite your CDBI code. @@ -92,7 +91,7 @@ This plugin will work, but it is more efficiently done using DBIC's native searc =head2 Choosing Features In fact, this class is just a recipe containing all the features emulated. -If you like, you can choose which features to emulate by building your +If you like, you can choose which features to emulate by building your own class and loading it like this: package My::DB;