X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-DBIx-Class-ResultSet-RecursiveUpdate;a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FResultSet%2FRecursiveUpdate.pm;fp=lib%2FDBIx%2FClass%2FResultSet%2FRecursiveUpdate.pm;h=6626c1c9145b66eb110810baafa722e32314559b;hp=59dbc47311d5368778107044ec6eddd81e3a1250;hb=387b70d1f646ae86c8206aa180d3e7b38301e905;hpb=c342f7182586afb9b6fdf1842c34c72b5a681cd1 diff --git a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm index 59dbc47..6626c1c 100644 --- a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm +++ b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm @@ -50,7 +50,7 @@ sub recursive_update { my $source = $self->result_source; # warn 'entering: ' . $source->from(); - carp 'fixed fields needs to be an array ref' + croak 'fixed fields needs to be an arrayref' if defined $fixed_fields && ref $fixed_fields ne 'ARRAY'; if ( blessed($updates) && $updates->isa('DBIx::Class::Row') ) {