diff options
author | ivan <ivan> | 2002-12-04 12:31:50 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-12-04 12:31:50 +0000 |
commit | 2493991073b60d269be87a0f0964a33dd90d6f96 (patch) | |
tree | 88e0b616a3e0b51755ca30e66df248c8f5459770 | |
parent | cf7dde567416fb1c3b7108267341a90bf59695b0 (diff) |
empty invoice_lines() fix
-rw-r--r-- | FS/FS/cust_bill.pm | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 18b8aa7a0..bff33afd5 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1184,16 +1184,14 @@ sub print_text { # ); #and subroutine for the template - sub FS::cust_bill::_template::invoice_lines { - my $lines = shift or return @buf; + my $lines = shift || scalar(@buf); map { scalar(@buf) ? shift @buf : [ '', '' ]; } ( 1 .. $lines ); } - #and fill it in $FS::cust_bill::_template::page = 1; my $lines; @@ -1213,7 +1211,7 @@ sub print_text { =head1 VERSION -$Id: cust_bill.pm,v 1.41.2.12 2002-11-22 12:19:05 ivan Exp $ +$Id: cust_bill.pm,v 1.41.2.13 2002-12-04 12:31:50 ivan Exp $ =head1 BUGS |