Update of /cvs/scoop/scoop/scripts
In directory lithium.sabren.com:/tmp/cvs-serv17667/scripts
Modified Files:
upgrade-db.pl
Log Message:
Committing janra's signup password fix. -j
Index: upgrade-db.pl
===================================================================
RCS file: /cvs/scoop/scoop/scripts/upgrade-db.pl,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** upgrade-db.pl 12 Oct 2002 21:25:04 -0000 1.14
--- upgrade-db.pl 28 Apr 2006 17:47:10 -0000 1.15
***************
*** 101,109 ****
=pod
! 5) get and apply latest patches
! 6) cleanup
=cut
if( $VERBOSE ) {
print "I will now try to apply all of the patches I find. If this is
--- 101,112 ----
=pod
! 5) Backup db before applying patches
! 6) get and apply latest patches
! 7) cleanup
=cut
+ &backup_db;
+
if( $VERBOSE ) {
print "I will now try to apply all of the patches I find. If this is
***************
*** 541,544 ****
--- 544,555 ----
return $rv;
}
+
+ # db backup func. Backs up the existing database, assuming the user wants to.
+ # You *do* want to do this before you install all those patches, right?
+
+ sub backup_db {
+
+
+ }
sub usage {