[freeside-commits] freeside/FS/FS cust_svc.pm,1.66.2.10,1.66.2.11

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv2818

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_svc.pm 
Log Message:
don't throw 'Use of uninitialized value in addition (+) at /usr/local/share/perl/5.8.8/FS/cust_svc.pm line 626.' error when using attribute_since_sqlradacct

Index: cust_svc.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_svc.pm,v
retrieving revision 1.66.2.10
retrieving revision 1.66.2.11
diff -u -d -r1.66.2.10 -r1.66.2.11
--- cust_svc.pm	25 Jan 2009 01:27:44 -0000	1.66.2.10
+++ cust_svc.pm	15 Mar 2009 22:33:09 -0000	1.66.2.11
@@ -623,7 +623,8 @@
     ) or die $dbh->errstr;
     $sth->execute($username, $start, $end) or die $sth->errstr;
 
-    $sum += $sth->fetchrow_arrayref->[0];
+    my $row = $sth->fetchrow_arrayref;
+    $sum += $row->[0] if defined($row->[0]);
 
     warn "$mes done SUMing sessions\n"
       if $DEBUG;