X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FPK%2FAuto%2FMySQL.pm;h=3107819289840bec9515d2c8d9eca33de35500ab;hb=b5d2c57ff7daf4602904b0d2972824d2c3dd37d3;hp=59fb00f614f6ef10fe0a8bcb5f062205f23e78f7;hpb=66d9ef6bf10ccbdc9391e81e5b1ad1b615fb67f7;p=dbsrgits%2FDBIx-Class-Historic.git diff --git a/lib/DBIx/Class/PK/Auto/MySQL.pm b/lib/DBIx/Class/PK/Auto/MySQL.pm index 59fb00f..3107819 100644 --- a/lib/DBIx/Class/PK/Auto/MySQL.pm +++ b/lib/DBIx/Class/PK/Auto/MySQL.pm @@ -7,33 +7,22 @@ use base qw/DBIx::Class/; __PACKAGE__->load_components(qw/PK::Auto/); -sub last_insert_id { - return $_[0]->result_source->storage->dbh->{mysql_insertid}; -} - 1; -=head1 NAME +=head1 NAME -DBIx::Class::PK::Auto::MySQL - Automatic Primary Key class for MySQL +DBIx::Class::PK::Auto::MySQL - (DEPRECATED) Automatic primary key class for MySQL =head1 SYNOPSIS - # In your table classes - __PACKAGE__->load_components(qw/PK::Auto::MySQL Core/); - __PACKAGE__->set_primary_key('id'); - -=head1 DESCRIPTION - -This class implements autoincrements for MySQL. +Just load PK::Auto instead; auto-inc is now handled by Storage. =head1 AUTHORS -Matt S. Trout +Matt S Trout =head1 LICENSE You may distribute this code under the same terms as Perl itself. =cut -