X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FSchema%2FLoader%2FDBI%2Fmysql.pm;h=f102b3f7d5bcaa2c56262ff45e6877a1bcc11b8d;hb=45be2ce774dc5af71a60397db33bc952c22aa489;hp=966cec3a6597dfbe8390a2850eb2b95247a3c03e;hpb=c0084472a2f4515cbbd3970773b7d52ff20bcc45;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/lib/DBIx/Class/Schema/Loader/DBI/mysql.pm b/lib/DBIx/Class/Schema/Loader/DBI/mysql.pm index 966cec3..f102b3f 100644 --- a/lib/DBIx/Class/Schema/Loader/DBI/mysql.pm +++ b/lib/DBIx/Class/Schema/Loader/DBI/mysql.pm @@ -117,20 +117,20 @@ sub _table_uniq_info { sub _extra_column_info { no warnings 'uninitialized'; - my ($self, $info) = @_; + my ($self, $table, $col, $info, $dbi_info) = @_; my %extra_info; - if ($info->{mysql_is_auto_increment}) { + if ($dbi_info->{mysql_is_auto_increment}) { $extra_info{is_auto_increment} = 1 } - if ($info->{mysql_type_name} =~ /\bunsigned\b/i) { + if ($dbi_info->{mysql_type_name} =~ /\bunsigned\b/i) { $extra_info{extra}{unsigned} = 1; } - if ($info->{mysql_values}) { - $extra_info{extra}{list} = $info->{mysql_values}; + if ($dbi_info->{mysql_values}) { + $extra_info{extra}{list} = $dbi_info->{mysql_values}; } - if ( $info->{COLUMN_DEF} =~ /^CURRENT_TIMESTAMP\z/i - && $info->{mysql_type_name} =~ /^TIMESTAMP\z/i) { + if ( $dbi_info->{COLUMN_DEF} =~ /^CURRENT_TIMESTAMP\z/i + && $dbi_info->{mysql_type_name} =~ /^TIMESTAMP\z/i) { $extra_info{default_value} = \'CURRENT_TIMESTAMP'; }