insert in ResultSet now recurses - we don't want this
authorzby <zby@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
Thu, 6 Nov 2008 11:05:52 +0000 (11:05 +0000)
committerzby <zby@bd8105ee-0ff8-0310-8827-fb3f25b6796d>
Thu, 6 Nov 2008 11:05:52 +0000 (11:05 +0000)
lib/DBIx/Class/ResultSet/RecursiveUpdate.pm
t/var/dvdzbr.db

index 7115aaa7863d0bb6fe58aaf4e2c2aaa54a9fc4eb..39366e714674d98aa619de482be6f46e0aa83662 100644 (file)
@@ -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
index c279b90af5bd6b1cb92622e17086708918e5ff1a..86a55809d2fd6e8490bc3e06e1cd7a657d15e317 100644 (file)
Binary files a/t/var/dvdzbr.db and b/t/var/dvdzbr.db differ
This page took 0.020215 seconds and 4 git commands to generate.