From: jeff <jeff>
Date: Tue, 5 Jun 2007 15:08:40 +0000 (+0000)
Subject: correct shorage of variables bound to prepared statement
X-Git-Tag: TRIXBOX_2_6~504
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=2ef0947ad899d67b8d34a5d3519f22f4e40b42ec

correct shorage of variables bound to prepared statement
---

diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm
index 1e0389d5c..b8f6349c9 100644
--- a/FS/FS/svc_acct.pm
+++ b/FS/FS/svc_acct.pm
@@ -1753,7 +1753,7 @@ sub set_usage {
   if (scalar(keys %handyhash)) {
     my $sth = $dbh->prepare( $sql )
       or die "Error preparing $sql: ". $dbh->errstr;
-    my $rv = $sth->execute((grep{$_} values %handyhash), $self->svcnum);
+    my $rv = $sth->execute((values %handyhash), $self->svcnum);
     die "Error executing $sql: ". $sth->errstr
       unless defined($rv);
     die "Can't update usage for svcnum ". $self->svcnum