fixed bug where an object that has already been found by its pk is overwritten by...
authorAlexander Hartmaier <abraxxa@cpan.org>
Sat, 23 Oct 2010 14:13:11 +0000 (16:13 +0200)
committerAlexander Hartmaier <abraxxa@cpan.org>
Sat, 23 Oct 2010 14:13:11 +0000 (16:13 +0200)
lib/DBIx/Class/ResultSet/RecursiveUpdate.pm

index e9b56e4f170edae2802de448386417e8c0d558da..67a7ffd602bf7605eaa33d06b045a14343e68916 100644 (file)
@@ -81,7 +81,9 @@ sub recursive_update {
        # warn 'finding by +resolved: ' . Dumper( $updates ); use Data::Dumper;
         $object = $self->find( $updates, { key => 'primary' } );
     }
-    $object ||= $self->new( {} );
+
+    $object = $self->new( {} )
+        unless defined $object;
 
     # warn Dumper( $updates ); use Data::Dumper;
     # direct column accessors
This page took 0.02058 seconds and 4 git commands to generate.