[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Gforge-commits] gforge/deb-specific db-upgrade.pl,1.61,1.62
From: |
cbayle |
Subject: |
[Gforge-commits] gforge/deb-specific db-upgrade.pl,1.61,1.62 |
Date: |
Fri, 08 Oct 2004 16:13:06 -0500 |
Update of /cvsroot/gforge/gforge/deb-specific
In directory db.perdue.net:/tmp/cvs-serv3775/deb-specific
Modified Files:
db-upgrade.pl
Log Message:
Deal with new db/*.sql files
Index: db-upgrade.pl
===================================================================
RCS file: /cvsroot/gforge/gforge/deb-specific/db-upgrade.pl,v
retrieving revision 1.61
retrieving revision 1.62
diff -u -d -r1.61 -r1.62
--- db-upgrade.pl 1 Oct 2004 11:35:26 -0000 1.61
+++ db-upgrade.pl 8 Oct 2004 21:13:03 -0000 1.62
@@ -1653,6 +1653,66 @@
$dbh->commit () ;
}
+ $version = &get_db_version ;
+ $target = "3.3.0-2+4" ;
+ if (&is_lesser ($version, $target)) {
+ &debug ("Upgrading with 20040914.sql") ;
+
+ @reqlist = @{ &parse_sql_file ("/usr/lib/gforge/db/20040914.sql") } ;
+ foreach my $s (@reqlist) {
+ $query = $s ;
+ # debug $query ;
+ $sth = $dbh->prepare ($query) ;
+ $sth->execute () ;
+ $sth->finish () ;
+ }
+ @reqlist = () ;
+
+ &update_db_version ($target) ;
+ &debug ("Committing.") ;
+ $dbh->commit () ;
+ }
+
+ $version = &get_db_version ;
+ $target = "3.3.0-2+5" ;
+ if (&is_lesser ($version, $target)) {
+ &debug ("Upgrading with 20041005.sql") ;
+
+ @reqlist = @{ &parse_sql_file ("/usr/lib/gforge/db/20041005.sql") } ;
+ foreach my $s (@reqlist) {
+ $query = $s ;
+ # debug $query ;
+ $sth = $dbh->prepare ($query) ;
+ $sth->execute () ;
+ $sth->finish () ;
+ }
+ @reqlist = () ;
+
+ &update_db_version ($target) ;
+ &debug ("Committing.") ;
+ $dbh->commit () ;
+ }
+
+ $version = &get_db_version ;
+ $target = "3.3.0-2+6" ;
+ if (&is_lesser ($version, $target)) {
+ &debug ("Upgrading with 20041006.sql") ;
+
+ @reqlist = @{ &parse_sql_file ("/usr/lib/gforge/db/20041006.sql") } ;
+ foreach my $s (@reqlist) {
+ $query = $s ;
+ # debug $query ;
+ $sth = $dbh->prepare ($query) ;
+ $sth->execute () ;
+ $sth->finish () ;
+ }
+ @reqlist = () ;
+
+ &update_db_version ($target) ;
+ &debug ("Committing.") ;
+ $dbh->commit () ;
+ }
+
&debug ("It seems your database $action went well and smoothly. That's
cool.") ;
&debug ("Please enjoy using Gforge.") ;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Gforge-commits] gforge/deb-specific db-upgrade.pl,1.61,1.62,
cbayle <=
- Prev by Date:
[Gforge-commits] gforge/common/forum ForumMessage.class,1.9,1.10
- Next by Date:
[Gforge-commits] gforge/www/admin index.php, 1.23, 1.24 grouplist.php, 1.16, 1.17 useredit.php, 1.8, 1.9 approve-pending.php, 1.17, 1.18 userlist.php, 1.17, 1.18
- Previous by thread:
[Gforge-commits] gforge/common/forum ForumMessage.class,1.9,1.10
- Next by thread:
[Gforge-commits] gforge/www/admin index.php, 1.23, 1.24 grouplist.php, 1.16, 1.17 useredit.php, 1.8, 1.9 approve-pending.php, 1.17, 1.18 userlist.php, 1.17, 1.18
- Index(es):