X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FODBC%2FDB2_400_SQL.pm;h=16be2f8c14eafc254de7fea2cec46ac6f35cd8f0;hb=25ca709b095f6f33043eaf056b34720f2334a04d;hp=33a4e7abb65a225e6e837e0017922739bf1421fb;hpb=2ad62d97476187e57d20ee49b39d7a7af864bb20;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm b/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm index 33a4e7a..16be2f8 100644 --- a/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm +++ b/lib/DBIx/Class/Storage/DBI/ODBC/DB2_400_SQL.pm @@ -23,7 +23,7 @@ sub _dbh_last_insert_id { sub _sql_maker_opts { my ($self) = @_; - + $self->dbh_do(sub { my ($self, $dbh) = @_; @@ -43,8 +43,8 @@ over ODBC =head1 SYNOPSIS - # In your table classes - __PACKAGE__->load_components(qw/PK::Auto Core/); + # In your result (table) classes + use base 'DBIx::Class::Core'; __PACKAGE__->set_primary_key('id');