X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat.pm;h=874c4c772576b66750599d489c224f9530a7841c;hb=096f421241;hp=4d0d412607cbc5466cb1260e759dbb75f8ebcc44;hpb=130c64391b48bae9eb374e931c7d6c308625bf6b;p=dbsrgits%2FDBIx-Class.git

diff --git a/lib/DBIx/Class/CDBICompat.pm b/lib/DBIx/Class/CDBICompat.pm
index 4d0d412..874c4c7 100644
--- a/lib/DBIx/Class/CDBICompat.pm
+++ b/lib/DBIx/Class/CDBICompat.pm
@@ -3,6 +3,13 @@ package DBIx::Class::CDBICompat;
 use strict;
 use warnings;
 use base qw/DBIx::Class::Core DBIx::Class::DB/;
+use Carp::Clan qw/^DBIx::Class/;
+
+eval {
+  require Class::Trigger;
+  require DBIx::ContextualFetch;
+};
+croak "Class::Trigger and DBIx::ContextualFetch is required for CDBICompat" if $@;
 
 __PACKAGE__->load_own_components(qw/
   Constraints
@@ -30,9 +37,9 @@ __PACKAGE__->load_own_components(qw/
             #DBIx::Class::ObjIndexStubs
 1;
 
-=head1 NAME 
+=head1 NAME
 
-DBIx::Class::CDBICompat - Class::DBI Compatability layer.
+DBIx::Class::CDBICompat - Class::DBI Compatibility layer.
 
 =head1 SYNOPSIS
 
@@ -41,15 +48,15 @@ DBIx::Class::CDBICompat - Class::DBI Compatability layer.
 
 =head1 DESCRIPTION
 
-DBIx::Class features a fully featured compability layer with L<Class::DBI>
+DBIx::Class features a fully featured compatibility layer with L<Class::DBI>
 to ease transition for existing CDBI users. In fact, this class is just a
 receipe containing all the features emulated. If you like, you can choose
-which features to emulate by building your own class and loading it like 
+which features to emulate by building your own class and loading it like
 this:
 
   __PACKAGE__->load_own_components(qw/CDBICompat/);
 
-this will automatically load the features included in My::DB::CDBICompat, 
+this will automatically load the features included in My::DB::CDBICompat,
 provided it looks something like this:
 
   package My::DB::CDBICompat;
@@ -61,7 +68,7 @@ provided it looks something like this:
     CDBICompat::MightHave
   /);
 
-=head1 Components
+=head1 COMPONENTS
 
 =over 4
 
@@ -87,12 +94,8 @@ Allows you to turn on automatic updates for column values.
 
 =item HasA
 
-Responsible for HasA relationships. 
-
 =item HasMany
 
-Responsible for HasMany relationships. 
-
 =item ImaDBI
 
 =item LazyLoading
@@ -100,12 +103,10 @@ Responsible for HasMany relationships.
 =item LiveObjectIndex
 
 The live object index tries to ensure there is only one version of a object
-in the perl interprenter.
+in the perl interpreter.
 
 =item MightHave
 
-Responsible for MightHave relationships. 
-
 =item ObjIndexStubs
 
 =item ReadOnly
@@ -118,8 +119,6 @@ Responsible for MightHave relationships.
 
 =item Triggers
 
-This class implements the trigger functionality.
-
 =item PassThrough
 
 =back