From: David Kamholz <dkamholz@cpan.org>
Date: Tue, 7 Feb 2006 19:31:35 +0000 (+0000)
Subject: tweak to Serialize -- do it even when dcloneing
X-Git-Tag: v0.05005~23
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6c7dcfa85846d892e4487c18092cd71d55eb3ab3;p=dbsrgits%2FDBIx-Class.git

tweak to Serialize -- do it even when dcloneing
---

diff --git a/lib/DBIx/Class/Serialize.pm b/lib/DBIx/Class/Serialize.pm
index 86e3d2f..345b99c 100644
--- a/lib/DBIx/Class/Serialize.pm
+++ b/lib/DBIx/Class/Serialize.pm
@@ -4,7 +4,7 @@ use Storable qw/freeze thaw/;
 
 sub STORABLE_freeze {
     my ($self,$cloning) = @_;
-    return if $cloning;
+    #return if $cloning;
     my $to_serialize = { %$self };
     delete $to_serialize->{result_source};
     return (freeze($to_serialize));