From 20f37c06d04ecf57e9b464bad23998fce6ac1e80 Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 4 Dec 2002 12:31:49 +0000 Subject: [PATCH] empty invoice_lines() fix --- FS/FS/cust_bill.pm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 3481a9a86..1742f604f 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -1092,16 +1092,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; @@ -1121,7 +1119,7 @@ sub print_text { =head1 VERSION -$Id: cust_bill.pm,v 1.55 2002-11-22 12:19:15 ivan Exp $ +$Id: cust_bill.pm,v 1.56 2002-12-04 12:31:49 ivan Exp $ =head1 BUGS -- 2.11.0