From e9b930f5813d6df9e13d89c36ca0d7fc7973d2bc Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 4 May 2009 01:17:24 +0000 Subject: [PATCH] eliminate Argument "" isn't numeric in addition (+) warning --- FS/FS/svc_acct.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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; }, ); -- 2.11.0