diff options
| -rw-r--r-- | FS/FS/cust_pay.pm | 6 |
1 files changed, 5 insertions, 1 deletions
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; |