[freeside-commits] freeside/FS/FS cust_pay.pm,1.50.2.8,1.50.2.9

Ivan,,, ivan at wavetail.420.am
Thu Feb 21 16:57:40 PST 2008


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

Modified Files:
      Tag: FREESIDE_1_7_BRANCH
	cust_pay.pm 
Log Message:
don't bomb out on this transition on old databases without history records for everything...

Index: cust_pay.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_pay.pm,v
retrieving revision 1.50.2.8
retrieving revision 1.50.2.9
diff -u -d -r1.50.2.8 -r1.50.2.9
--- cust_pay.pm	14 Feb 2008 03:54:12 -0000	1.50.2.8
+++ cust_pay.pm	22 Feb 2008 00:57:38 -0000	1.50.2.9
@@ -698,7 +698,11 @@
     return unless $cust_pay;
 
     my $h_cust_pay = $cust_pay->h_search('insert');
-    $cust_pay->otaker($h_cust_pay->history_user);
+    if ( $h_cust_pay ) {
+      $cust_pay->otaker($h_cust_pay->history_user);
+    } else {
+      $cust_pay->otaker('legacy');
+    }
     my $error = $cust_pay->replace;
     die $error if $error;
 



More information about the freeside-commits mailing list