From: zby <zby@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
Date: Thu, 6 Nov 2008 11:05:52 +0000 (+0000)
Subject: insert in ResultSet now recurses - we don't want this
X-Git-Url: https://git.brokenzipper.com/gitweb?a=commitdiff_plain;h=76b92189b37b84fed8fff6df90966e9c0d4d581b;p=chaz%2Fp5-DBIx-Class-ResultSet-RecursiveUpdate

insert in ResultSet now recurses - we don't want this
---

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
diff --git a/t/var/dvdzbr.db b/t/var/dvdzbr.db
index c279b90..86a5580 100644
Binary files a/t/var/dvdzbr.db and b/t/var/dvdzbr.db differ