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;

Reply via email to