[Bast-commits] r3429 - branches/DBIx-Class-current/lib/DBIx/Class

matthewt at dev.catalyst.perl.org matthewt at dev.catalyst.perl.org
Tue May 29 02:15:47 GMT 2007


Author: matthewt
Date: 2007-05-29 02:15:46 +0100 (Tue, 29 May 2007)
New Revision: 3429

Modified:
   branches/DBIx-Class-current/lib/DBIx/Class/Row.pm
Log:
fix up stupid mistake I made merging

Modified: branches/DBIx-Class-current/lib/DBIx/Class/Row.pm
===================================================================
--- branches/DBIx-Class-current/lib/DBIx/Class/Row.pm	2007-05-29 01:11:27 UTC (rev 3428)
+++ branches/DBIx-Class-current/lib/DBIx/Class/Row.pm	2007-05-29 01:15:46 UTC (rev 3429)
@@ -142,9 +142,6 @@
     if $self->can('result_source_instance');
   $self->throw_exception("No result_source set on this object; can't insert")
     unless $source;
-  #use Data::Dumper; warn Dumper($self);
-  # Check if we stored uninserted relobjs here in new()
-  $source->storage->txn_begin if(!$self->{_rel_in_storage});
 
   # Check if we stored uninserted relobjs here in new()
   my %related_stuff = (%{$self->{_relationship_data} || {}}, 




More information about the Bast-commits mailing list