diff options
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/payment.pl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/scripts/payment.pl b/scripts/payment.pl index 6dfbed05..295ad60e 100644 --- a/scripts/payment.pl +++ b/scripts/payment.pl @@ -307,6 +307,7 @@ sub print { } for my $inv (1 .. $inv_count){ + print STDERR "Invoice $inv of " .$payment->{"invoice_count_$id"} . "\n"; my $invhash = {}; my $inv_id = $payment->{"invoice_${id}_$inv"}; for (qw(invnumber invdate)){ |