From aa11ac28cd55fc1fd633906be7342ccbf4e489e0 Mon Sep 17 00:00:00 2001 From: ivan Date: Sat, 5 Feb 2011 04:49:41 +0000 Subject: [PATCH] add more debug tracing to invoice generation, RT#11452 --- FS/FS/cust_bill.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 33490c951..58beea219 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -4247,6 +4247,9 @@ sub _items_cust_bill_pkg { if ( $cust_bill_pkg->setup != 0 && (!$type || $type eq 'S') ) { + warn "$me _items_cust_bill_pkg adding setup\n" + if $DEBUG > 1; + my $description = $desc; $description .= ' Setup' if $cust_bill_pkg->recur != 0; @@ -4295,6 +4298,9 @@ sub _items_cust_bill_pkg { ) { + warn "$me _items_cust_bill_pkg adding recur/usage\n" + if $DEBUG > 1; + my $is_summary = $display->summary; my $description = ($is_summary && $type && $type eq 'U') ? "Usage charges" : $desc; -- 2.11.0