[freeside-commits] freeside/FS/FS/cust_main Billing.pm, 1.5, 1.6 Billing_Realtime.pm, 1.6, 1.7

Ivan,,, ivan at wavetail.420.am
Wed Sep 22 13:46:40 PDT 2010


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

Modified Files:
	Billing.pm Billing_Realtime.pm 
Log Message:
use Data::Dumper to fix debugging - hopefully last of fallout from refactoring things into their own fiels

Index: Billing_Realtime.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main/Billing_Realtime.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -w -d -r1.6 -r1.7
--- Billing_Realtime.pm	22 Sep 2010 19:16:19 -0000	1.6
+++ Billing_Realtime.pm	22 Sep 2010 20:46:38 -0000	1.7
@@ -3,6 +3,7 @@
 use strict;
 use vars qw( $conf $DEBUG $me );
 use vars qw( $realtime_bop_decline_quiet ); #ugh
+use Data::Dumper;
 use Digest::MD5 qw(md5_base64);
 use Business::CreditCard 0.28;
 use FS::UID qw( dbh );

Index: Billing.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_main/Billing.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -w -d -r1.5 -r1.6
--- Billing.pm	22 Sep 2010 19:16:19 -0000	1.5
+++ Billing.pm	22 Sep 2010 20:46:38 -0000	1.6
@@ -3,6 +3,7 @@
 use strict;
 use vars qw( $conf $DEBUG $me );
 use Carp;
+use Data::Dumper;
 use List::Util qw( min );
 use FS::UID qw( dbh );
 use FS::Record qw( qsearch qsearchs dbdef );
@@ -628,6 +629,7 @@
 =back
 
 =cut
+
 sub calculate_taxes {
   my ($self, $cust_bill_pkg, $taxlisthash, $invoice_time) = @_;
 



More information about the freeside-commits mailing list