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;h=cdfd1ffca61472f2c085eb638bdbcf7328a99b2c;hp=6594748e721544db60aa244af7541f3d4599bcb0;hb=9cf5eeae14f2216a27e18c67a03cefe787dcfc4a;hpb=882e0965d8ecbf0320905b794bbbdbc7cc3582f7 diff --git a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm index 6594748..cdfd1ff 100644 --- a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm +++ b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm @@ -34,7 +34,7 @@ sub recursive_update { } package DBIx::Class::ResultSet::RecursiveUpdate::Functions; -use Carp; +use Carp::Clan qw/^DBIx::Class|^HTML::FormHandler|^Try::Tiny/; use Scalar::Util qw( blessed ); use List::MoreUtils qw/ any /; @@ -145,7 +145,7 @@ sub recursive_update { # don't throw a warning instead of an exception to give users # time to adapt to the new API - warn( + carp( "No such column, relationship, many-to-many helper accessor or generic accessor '$name'" ) unless $unknown_params_ok;