[Gforge-commits] %s

[Christian Bayle,,,]

Update of /cvsroot/gforge/gforge/deb-specific
In directory db.perdue.net:/tmp/cvs-serv18390/deb-specific

Modified Files:
        db-upgrade.pl 
Log Message:
Added 20041124.sql to db upgrade


Index: db-upgrade.pl
===================================================================
RCS file: /cvsroot/gforge/gforge/deb-specific/db-upgrade.pl,v
retrieving revision 1.68
retrieving revision 1.69
diff -C2 -d -r1.68 -r1.69
*** db-upgrade.pl       15 Jan 2005 22:34:15 -0000      1.68
--- db-upgrade.pl       20 Jan 2005 00:27:49 -0000      1.69
***************
*** 1857,1860 ****
--- 1857,1882 ----
      }
  
+     $version = &get_db_version ;
+     $target = "4.0.2-0+0" ;
+     # This is an exception, I reapply a modified version of 20040729.sql 
since it was doing nothing
+     # the other call was deleted from this file
+     if (&is_lesser ($version, $target)) {
+         &debug ("Upgrading with 20041124.sql") ;
+ 
+         @reqlist = @{ &parse_sql_file ("/usr/lib/gforge/db/20041124.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.") ;