X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fsvc_acct.pm;h=955547b731f6de3c575760c5087de800ce8acf84;hp=9ab90349f677b9ebe7db51c6136289dbe6691e82;hb=e9b930f5813d6df9e13d89c36ca0d7fc7973d2bc;hpb=9f73c5d4c0954b3a03bfcb5e010fc288a7071209 diff --git a/FS/FS/svc_acct.pm b/FS/FS/svc_acct.pm index 9ab90349f..955547b73 100644 --- a/FS/FS/svc_acct.pm +++ b/FS/FS/svc_acct.pm @@ -1711,7 +1711,7 @@ my %op2condition = ( $self->$column - $amount <= 0; }, '+' => sub { my($self, $column, $amount) = @_; - $self->$column + $amount > 0; + ($self->$column || 0) + $amount > 0; }, ); my %op2warncondition = ( @@ -1720,7 +1720,7 @@ my %op2warncondition = ( $self->$column - $amount <= $self->$threshold + 0; }, '+' => sub { my($self, $column, $amount) = @_; - $self->$column + $amount > 0; + ($self->$column || 0) + $amount > 0; }, );