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=39366e714674d98aa619de482be6f46e0aa83662;hp=7115aaa7863d0bb6fe58aaf4e2c2aaa54a9fc4eb;hb=76b92189b37b84fed8fff6df90966e9c0d4d581b;hpb=5d6f38c3bcdf0d75e477a32109e09b67343bcfb5 diff --git a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm index 7115aaa..39366e7 100644 --- a/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm +++ b/lib/DBIx/Class/ResultSet/RecursiveUpdate.pm @@ -44,6 +44,8 @@ sub recursive_update { #warn Dumper($object->{_column_data}); use Data::Dumper; } $self->_delete_empty_auto_increment($object); + # don't allow insert to recurse to related objects - we do the recursion ourselves + $object->{_rel_in_storage} = 1; $object->update_or_insert; # updating relations that can be done only after the row is inserted into the database