Author: timbo
Date: Wed Nov 22 05:32:23 2006
New Revision: 8096

Modified:
   dbi/trunk/Changes
   dbi/trunk/DBI.pm

Log:
Fixed type_info when called for multiple dbh thanks to Cosimo Streppone.
Added change note for previous freebsd changes.


Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes   (original)
+++ dbi/trunk/Changes   Wed Nov 22 05:32:23 2006
@@ -6,6 +6,9 @@
 
 =head2 Changes in DBI 1.XX (svn rev XX),   XX
 
+  Fixed type_info when called for multiple dbh thanks to Cosimo Streppone.
+  Fixed compile warnings in bleadperl on freebsd-6.1-release
+    and solaris 10g thanks to Philip M. Gollucci.
   Changed t/40profile.t to skip tests for perl < 5.8.0.
   Updated DBI::DBD docs for driver authors thanks to Ammon Riley.
 

Modified: dbi/trunk/DBI.pm
==============================================================================
--- dbi/trunk/DBI.pm    (original)
+++ dbi/trunk/DBI.pm    Wed Nov 22 05:32:23 2006
@@ -1715,7 +1715,9 @@
            my $temp = $dbh->type_info_all;
            return unless $temp && @$temp;
            # we cache here because type_info_all may be expensive to call
-           $tia      = $dbh->{dbi_type_info_row_cache} = $temp;
+           # (and we take a copy so the following shift can't corrupt
+           # the data that may be returned by future calls to type_info_all)
+           $tia      = $dbh->{dbi_type_info_row_cache} = [ @$temp ];
            $idx_hash = $dbh->{dbi_type_info_idx_cache} = shift @$tia;
        }
 

Reply via email to