X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FStorage%2FDBI%2FACCESS.pm;h=93841170b860ba13c9143433ef90e688e9a47e0e;hb=23b2c49b17262ecf84307c9ffba88ed38ecc90cb;hp=a6f174e8d2b822cb029bc8966cafd886a2d07966;hpb=696ba760d112264ea22e8b20db55987746677b81;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/Storage/DBI/ACCESS.pm b/lib/DBIx/Class/Storage/DBI/ACCESS.pm index a6f174e..9384117 100644 --- a/lib/DBIx/Class/Storage/DBI/ACCESS.pm +++ b/lib/DBIx/Class/Storage/DBI/ACCESS.pm @@ -70,11 +70,9 @@ sub insert { $columns_info->{$_}{is_auto_increment} } keys %$columns_info; - if (not $autoinc_col) { - $self->throw_exception( -'empty insert only supported for tables with an autoincrement column' - ); - } + $self->throw_exception( + 'empty insert only supported for tables with an autoincrement column' + ) unless $autoinc_col; my $table = $source->from; $table = $$table if ref $table;