changes for 0.05006 release

diff --git a/Changes b/Changes
index 29c2a69..e7035fe 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,7 @@
 Revision history for DBIx::Class
 
+0.05006 2006-02-17 15:32:40
+        - storage fix for fork() and workaround for Apache::DBI
         - made update(\%hash) work on row as well as rs
         - another fix for count with scalar group_by
         - remove dependency on Module::Find in 40resultsetmanager.t (RT #17598)

diff --git a/MANIFEST b/MANIFEST
index 5434fc5..1d24b6f 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -85,6 +85,7 @@ t/20setuperrors.t
 t/30dbicplain.t
 t/40resultsetmanager.t
 t/41orrible.t
+t/50fork.t
 t/basicrels/01core.t
 t/basicrels/04db.t
 t/basicrels/05multipk.t

diff --git a/README b/README
index 5fc958d..20cf5cd 100644 (file)
--- a/README
+++ b/README
@@ -110,6 +110,8 @@ CONTRIBUTORS
 
     Brandon Black
 
+    Scotty Allen <scotty@scottyallen.com>
+
 LICENSE
     You may distribute this code under the same terms as Perl itself.
 

diff --git a/lib/DBIx/Class.pm b/lib/DBIx/Class.pm
index 855f0b4..2514c87 100644 (file)
--- a/lib/DBIx/Class.pm
+++ b/lib/DBIx/Class.pm
@@ -13,7 +13,7 @@ sub component_base_class { 'DBIx::Class' }
 # i.e. first release of 0.XX *must* be 0.XX000. This avoids fBSD ports
 # brain damage and presumably various other packaging systems too
 
-$VERSION = '0.05005';
+$VERSION = '0.05006';
 
 sub MODIFY_CODE_ATTRIBUTES {
     my ($class,$code,@attrs) = @_;

diff --git a/lib/DBIx/Class/ResultSetManager.pm b/lib/DBIx/Class/ResultSetManager.pm
index 2a77f2a..c2af0f2 100644 (file)
--- a/lib/DBIx/Class/ResultSetManager.pm
+++ b/lib/DBIx/Class/ResultSetManager.pm
@@ -35,7 +35,7 @@ sub _register_attributes {
             no strict 'refs';
             my $resultset_class = $self->_setup_resultset_class;
             *{"$resultset_class\::$meth"} = $self->can($meth);
-            undef *{"$self\::$meth"};
+            delete ${"${self}::"}{$meth};
         }
     }
 }