[freeside-commits] freeside/FS/FS svc_acct.pm, 1.217.2.11, 1.217.2.12

[Jeff Finucane,420,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv3326

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	svc_acct.pm 
Log Message:
correct shorage of variables bound to prepared statement

Index: svc_acct.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_acct.pm,v
retrieving revision 1.217.2.11
retrieving revision 1.217.2.12
diff -u -d -r1.217.2.11 -r1.217.2.12
--- svc_acct.pm	7 May 2007 02:22:02 -0000	1.217.2.11
+++ svc_acct.pm	5 Jun 2007 15:07:28 -0000	1.217.2.12
@@ -1698,7 +1698,7 @@
   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