[freeside-commits] freeside/FS/bin freeside-upgrade,1.14,1.15

[Jeff Finucane,420,,]

Update of /home/cvs/cvsroot/freeside/FS/bin
In directory wavetail:/tmp/cvs-serv23022/FS/bin

Modified Files:
	freeside-upgrade 
Log Message:
change credit reasons from freetext to new reason/reason type system (#2777)

Index: freeside-upgrade
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/bin/freeside-upgrade,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- freeside-upgrade	28 Oct 2007 12:51:30 -0000	1.14
+++ freeside-upgrade	4 Dec 2007 18:20:58 -0000	1.15
@@ -11,6 +11,7 @@
 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 @@
   }
 }
 
+upgrade()
+  unless $DRY_RUN;
+
 $dbh->commit or die $dbh->errstr;
 
 dbdef_create($dbh, $dbdef_file);