don't do (as much) useless work on upgrade

diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm
index 358dfdc..ab81133 100644 (file)
--- a/FS/FS/cust_pay.pm
+++ b/FS/FS/cust_pay.pm
@@ -699,6 +699,7 @@ sub _upgrade_data {  #class method
 
     my $h_cust_pay = $cust_pay->h_search('insert');
     if ( $h_cust_pay ) {
+      next if $cust_pay->otaker eq $h_cust_pay->history_user;
       $cust_pay->otaker($h_cust_pay->history_user);
     } else {
       $cust_pay->otaker('legacy');