From 8e003fd0a8d49800d4a7211cbc2aeeacc72928a4 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Fri, 22 Feb 2008 00:57:37 +0000
Subject: [PATCH] don't bomb out on this transition on old databases without
 history records for everything...

---
 FS/FS/cust_pay.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm
index 67f34c387..5ba5b0a7d 100644
--- a/FS/FS/cust_pay.pm
+++ b/FS/FS/cust_pay.pm
@@ -698,7 +698,11 @@ sub _upgrade_data {  #class method
     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;
 
-- 
2.11.0