74355: freeside-upgrade error N/A (tokenized) [better error handling for encryption...

diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm
index ddddb24..72bc10f 100644 (file)
--- a/FS/FS/cust_main.pm
+++ b/FS/FS/cust_main.pm
@@ -5795,7 +5795,7 @@ sub queueable_upgrade {
         local($import) = 1;#prevent automatic geocoding (need its own variable?)
 
         my $error = $record->replace;
-        die $error if $error;
+        die "Error replacing $table ".$record->get($record->primary_key).": $error" if $error;
       }
     }