projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
9f73c5d
)
eliminate Argument "" isn't numeric in addition (+) warning
author
ivan
<ivan>
Mon, 4 May 2009 01:17:24 +0000
(
01:17
+0000)
committer
ivan
<ivan>
Mon, 4 May 2009 01:17:24 +0000
(
01:17
+0000)
FS/FS/svc_acct.pm
patch
|
blob
|
history
diff --git
a/FS/FS/svc_acct.pm
b/FS/FS/svc_acct.pm
index
9ab9034
..
955547b
100644
(file)
--- 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;
},
'+' => sub { my($self, $column, $amount) = @_;
-
$self->$column
+ $amount > 0;
+
($self->$column || 0)
+ $amount > 0;
},
);
my %op2warncondition = (
},
);
my %op2warncondition = (
@@
-1720,7
+1720,7
@@
my %op2warncondition = (
$self->$column - $amount <= $self->$threshold + 0;
},
'+' => sub { my($self, $column, $amount) = @_;
$self->$column - $amount <= $self->$threshold + 0;
},
'+' => sub { my($self, $column, $amount) = @_;
-
$self->$column
+ $amount > 0;
+
($self->$column || 0)
+ $amount > 0;
},
);
},
);