[svn:dbi] r6616 - dbi/trunk

[timbo]

Author: timbo
Date: Tue Jul  4 13:20:19 2006
New Revision: 6616

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

Log:
Fixed execute_for_fetch/execute_array to RaiseError thanks to Martin J. Evans.


Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes   (original)
+++ dbi/trunk/Changes   Tue Jul  4 13:20:19 2006
@@ -7,9 +7,11 @@
 =head2 Changes in DBI 1.52 (svn rev XXX),   XXX
 
 XXX update DBD::File (as sub-module?) to match latest.
+XXX update docs for Profile !Foo magic vars
 
   Fixed memory leak (16 bytes per sth) thanks to Doru Theodor Petrescu.
   Fixed small memory leak (per interpreter/thread) thanks to Ephraim Dan.
+  Fixed execute_for_fetch/execute_array to RaiseError thanks to Martin J. 
Evans.
   Added $dbh->statistics_info thanks to Brandon Black.
 
 =head2 Changes in DBI 1.51 (svn rev 6475),   6th June 2006

Modified: dbi/trunk/DBI.pm
==============================================================================
--- dbi/trunk/DBI.pm    (original)
+++ dbi/trunk/DBI.pm    Tue Jul  4 13:20:19 2006
@@ -1931,7 +1931,10 @@
                push @$tuple_status, [ $err, $errstr_cache{$err} ||= 
$sth->errstr, $sth->state ];
            }
        }
-       return ($err_count) ? undef : scalar(@$tuple_status)||"0E0";
+        my $tuples = @$tuple_status;
+        return $sth->set_err(1, "executing $tuple_status generated $err_count 
errors")
+            if $err_count;
+       return scalar(@$tuple_status) || "0E0";
     }