Add startup sanity check of the ::DBI::Replicated method dispatch tables

[dbsrgits/DBIx-Class-Historic.git] / lib / DBIx / Class / Storage / DBI / DB2.pm

diff --git a/lib/DBIx/Class/Storage/DBI/DB2.pm b/lib/DBIx/Class/Storage/DBI/DB2.pm
index 7b48741..31b9230 100644 (file)
--- a/lib/DBIx/Class/Storage/DBI/DB2.pm
+++ b/lib/DBIx/Class/Storage/DBI/DB2.pm
@@ -6,6 +6,10 @@ use warnings;
 use base qw/DBIx::Class::Storage::DBI/;
 use mro 'c3';
 
+__PACKAGE__->sql_limit_dialect ('RowNumberOver');
+__PACKAGE__->sql_quote_char ('"');
+__PACKAGE__->datetime_parser_type('DateTime::Format::DB2');
+
 sub _dbh_last_insert_id {
     my ($self, $dbh, $source, $col) = @_;
 
@@ -17,17 +21,6 @@ sub _dbh_last_insert_id {
     return @res ? $res[0] : undef;
 }
 
-sub datetime_parser_type { "DateTime::Format::DB2"; }
-
-sub _sql_maker_opts {
-    my ( $self, $opts ) = @_;
-    
-    if ( $opts ) {
-        $self->{_sql_maker_opts} = { %$opts };
-    }
-                    
-    return { limit_dialect => 'RowNumberOver', %{$self->{_sql_maker_opts}||{}} };
-}
 
 1;
 
@@ -38,7 +31,7 @@ DBIx::Class::Storage::DBI::DB2 - Automatic primary key class for DB2
 =head1 SYNOPSIS
 
   # In your table classes
-  __PACKAGE__->load_components(qw/PK::Auto Core/);
+  use base 'DBIx::Class::Core';
   __PACKAGE__->set_primary_key('id');
 
 =head1 DESCRIPTION