X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_bill.pm;h=23e8731dca24ea3eed87a5a39c0d202c2d4eff0e;hp=1742f604fadb09e1acdd349455e20f5334dcfd43;hb=f800872bff0d887ee096dfef186e6da7275ce5ae;hpb=fcaa42e4801db37d29efd02a429911bfe3ad0cdf diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 1742f604f..23e8731dc 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1032,9 +1032,9 @@ sub print_text { or die "cannot load config file $templatefile"; $invoice_lines = 0; my $wasfunc = 0; - foreach ( grep /invoice_lines\(\d+\)/, @invoice_template ) { #kludgy - /invoice_lines\((\d+)\)/; - $invoice_lines += $1; + foreach ( grep /invoice_lines\(\d*\)/, @invoice_template ) { #kludgy + /invoice_lines\((\d*)\)/; + $invoice_lines += $1 || scalar(@buf); $wasfunc=1; } die "no invoice_lines() functions in template?" unless $wasfunc; @@ -1119,7 +1119,7 @@ sub print_text { =head1 VERSION -$Id: cust_bill.pm,v 1.56 2002-12-04 12:31:49 ivan Exp $ +$Id: cust_bill.pm,v 1.57 2002-12-17 21:31:20 ivan Exp $ =head1 BUGS