cust_credit reason improvement, bugfix, and tool

1 files changed, 5 insertions, 0 deletions

diff --git a/FS/bin/freeside-upgrade b/FS/bin/freeside-upgrade
index 020d5fec6..f676e1b38 100755
--- a/FS/bin/freeside-upgrade
+++ b/FS/bin/freeside-upgrade
@@ -84,6 +84,11 @@ if ( $dbh->{Driver}->{Name} =~ /^mysql/i ) {
   }
 }
 
+$dbh->commit or die $dbh->errstr;  # we *MUST* commit before upgrading data
+dbdef_create($dbh, $dbdef_file);
+delete $FS::Schema::dbdef_cache{$dbdef_file}; #force an actual reload
+reload_dbdef($dbdef_file);
+
 upgrade()
   unless $DRY_RUN;