From: David Kamholz <dkamholz@cpan.org>
Date: Wed, 22 Nov 2006 22:09:07 +0000 (+0000)
Subject: add shallow copy of $attrs in ResultSet->new
X-Git-Tag: v0.08010~212
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=627cf2cd6a195d15e0dd7e70227e24da0aa92abe;p=dbsrgits%2FDBIx-Class.git

add shallow copy of $attrs in ResultSet->new
---

diff --git a/lib/DBIx/Class/ResultSet.pm b/lib/DBIx/Class/ResultSet.pm
index 61764b8..ce93efa 100644
--- a/lib/DBIx/Class/ResultSet.pm
+++ b/lib/DBIx/Class/ResultSet.pm
@@ -86,6 +86,7 @@ sub new {
 
   my ($source, $attrs) = @_;
   #weaken $source;
+  $attrs = { %{$attrs||{}} };
 
   if ($attrs->{page}) {
     $attrs->{rows} ||= 10;