Skip to content
Browse files

Merge pull request #77 from ktat/check-array-in-_execute

check bind value
  • Loading branch information...
2 parents 37cccb7 + 2a2d36b commit 976036f19798b9b94d89ff42997963f582d5b26a @nekokak committed Aug 23, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/Teng.pm
View
2 lib/Teng.pm
@@ -231,7 +231,7 @@ sub _execute {
$sth = $self->dbh->prepare($sql);
my $i = 1;
for my $v ( @{ $binds || [] } ) {
- $sth->bind_param( $i++, ref($v) ? @$v : $v );
+ $sth->bind_param( $i++, ref($v) eq 'ARRAY' ? @$v : $v );
}
$sth->execute();
};

0 comments on commit 976036f

Please sign in to comment.
Something went wrong with that request. Please try again.