change credit reasons from freetext to new reason/reason type system (#2777)

1 files changed, 4 insertions, 0 deletions

diff --git a/FS/bin/freeside-upgrade b/FS/bin/freeside-upgrade
index 02a615a68..fa9f90099 100755
--- a/FS/bin/freeside-upgrade
+++ b/FS/bin/freeside-upgrade
@@ -11,6 +11,7 @@ use FS::Schema qw( dbdef dbdef_dist reload_dbdef );
 use FS::Misc::prune qw(prune_applications);
 use FS::Conf;
 use FS::Record qw(qsearch);
+use FS::Upgrade qw(upgrade);
 
 die "Not running uid freeside!" unless checkeuid();
 
@@ -92,6 +93,9 @@ if ( $dbh->{Driver}->{Name} =~ /^mysql/i ) {
   }
 }
 
+upgrade()
+  unless $DRY_RUN;
+
 $dbh->commit or die $dbh->errstr;
 
 dbdef_create($dbh, $dbdef_file);