diff options
| -rw-r--r-- | FS/FS/cust_credit.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/FS/FS/cust_credit.pm b/FS/FS/cust_credit.pm index 560be20b4..2dfd081c8 100644 --- a/FS/FS/cust_credit.pm +++ b/FS/FS/cust_credit.pm @@ -717,8 +717,7 @@ sub credit_lineitems { my %cust_credit_bill = (); my %cust_bill_pkg = (); my %cust_credit_bill_pkg = (); - # except here they're billpaynums - my %unapplied_payments; + my %unapplied_payments = (); # except here they're billpaynums foreach my $billpkgnum ( @{$arg{billpkgnums}} ) { my $setuprecur = shift @{$arg{setuprecurs}}; my $amount = shift @{$arg{amounts}}; |