[freeside-commits] freeside/FS/FS cust_pkg.pm, 1.179.2.17, 1.179.2.18 cust_bill.pm, 1.299.2.14, 1.299.2.15

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv24688

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	cust_pkg.pm cust_bill.pm 
Log Message:
add more debug tracing to invoice generation, RT#11452

Index: cust_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pkg.pm,v
retrieving revision 1.179.2.17
retrieving revision 1.179.2.18
diff -u -w -d -r1.179.2.17 -r1.179.2.18
--- cust_pkg.pm	5 Feb 2011 05:45:41 -0000	1.179.2.17
+++ cust_pkg.pm	5 Feb 2011 06:03:46 -0000	1.179.2.18
@@ -2196,6 +2196,8 @@
           $detail =~ s/, $//;
           push @labels, $detail;
         }
+        warn "$me _labels_short   done consolidating services\n"
+          if $DEBUG;
       } else {
         warn "$me _labels_short   adding service data\n"
           if $DEBUG;

Index: cust_bill.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_bill.pm,v
retrieving revision 1.299.2.14
retrieving revision 1.299.2.15
diff -u -w -d -r1.299.2.14 -r1.299.2.15
--- cust_bill.pm	5 Feb 2011 04:58:52 -0000	1.299.2.14
+++ cust_bill.pm	5 Feb 2011 06:03:46 -0000	1.299.2.15
@@ -4334,6 +4334,9 @@
                                                    #$cust_bill_pkg->sdate)
               unless $cust_bill_pkg->pkgpart_override; #don't redisplay services
 
+            warn "$me _items_cust_bill_pkg done adding service details\n"
+              if $DEBUG > 1;
+
             if ( $multilocation ) {
               my $loc = $cust_pkg->location_label;
               $loc = substr($loc, 0, 50). '...'