Author: mjevans
Date: Tue Mar 8 06:29:12 2011
New Revision: 14750
Modified:
dbi/trunk/Changes
dbi/trunk/DBI.pm
Log:
Fixed ParamTypes example in pod
Modified: dbi/trunk/Changes
==============================================================================
--- dbi/trunk/Changes (original)
+++ dbi/trunk/Changes Tue Mar 8 06:29:12 2011
@@ -15,6 +15,7 @@
Added CON, ENC and DBD trace flags and extended 09trace.t (Martin J. Evans)
Added TXN trace flags and applied CON and TXN to relevant methods (Tim Bunce)
Enhanced and standardized driver trace level mechanism (Tim Bunce)
+ Fixed ParamTypes example in the pod (Martin J. Evans)
=head2 Changes in DBI 1.616 (svn r14616) 30th December 2010
Modified: dbi/trunk/DBI.pm
==============================================================================
--- dbi/trunk/DBI.pm (original)
+++ dbi/trunk/DBI.pm Tue Mar 8 06:29:12 2011
@@ -6979,8 +6979,8 @@
my $sth2 = $dbh->prepare( $sth1->{Statement} );
my $ParamValues = $sth1->{ParamValues} || {};
my $ParamTypes = $sth1->{ParamTypes} || {};
- $sth2->bind_param($_, $PV->{$_} $PT->{$_})
- for keys %{ %$PV, %$PT };
+ $sth2->bind_param($_, $ParamValues->{$_} $ParamTypes->{$_})
+ for keys %{ {%$ParamValues, %$ParamTypes} };
$sth2->execute();
The C<ParamTypes> attribute was added in DBI 1.49. Implementation
