[freeside-commits] freeside/FS/FS svc_acct.pm, 1.217.2.24, 1.217.2.25

Ivan,,, ivan at wavetail.420.am
Sun May 3 18:17:28 PDT 2009


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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	svc_acct.pm 
Log Message:
eliminate Argument "" isn't numeric in addition (+) warning

Index: svc_acct.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/svc_acct.pm,v
retrieving revision 1.217.2.24
retrieving revision 1.217.2.25
diff -u -d -r1.217.2.24 -r1.217.2.25
--- svc_acct.pm	7 Apr 2009 18:20:48 -0000	1.217.2.24
+++ svc_acct.pm	4 May 2009 01:17:26 -0000	1.217.2.25
@@ -1639,7 +1639,7 @@
                $self->$column - $amount <= 0;
              },
   '+' => sub { my($self, $column, $amount) = @_;
-               $self->$column + $amount > 0;
+               ($self->$column || 0) + $amount > 0;
              },
 );
 my %op2warncondition = (
@@ -1648,7 +1648,7 @@
                $self->$column - $amount <= $self->$threshold + 0;
              },
   '+' => sub { my($self, $column, $amount) = @_;
-               $self->$column + $amount > 0;
+               ($self->$column || 0) + $amount > 0;
              },
 );
 



More information about the freeside-commits mailing list