Author: timbo
Date: Sat May 2 09:20:39 2009
New Revision: 12735
Modified:
dbi/trunk/lib/DBD/File.pm
Log:
Fix execute() to use the same logic to get param count as is used to set
NUM_OF_PARAMS.
Modified: dbi/trunk/lib/DBD/File.pm
==============================================================================
--- dbi/trunk/lib/DBD/File.pm (original)
+++ dbi/trunk/lib/DBD/File.pm Sat May 2 09:20:39 2009
@@ -541,7 +541,7 @@
$sth->finish;
my $stmt = $sth->{f_stmt};
- unless ((my $req_prm = $stmt->{num_placeholders} || 0) == (my $nparm =
@$params)) {
+ unless ((my $req_prm = scalar($stmt->params())) == (my $nparm = @$params))
{
$sth->set_err ($DBI::stderr,
"You passed $nparm parameters where $req_prm required");
return;