Merge remote-tracking branch 'kc/master' into merged_5549
authorChris Cormack <chrisc@catalyst.net.nz>
Thu, 22 Mar 2012 04:05:16 +0000 (17:05 +1300)
committerChris Cormack <chrisc@catalyst.net.nz>
Thu, 22 Mar 2012 04:05:16 +0000 (17:05 +1300)
1  2 
installer/data/mysql/updatedatabase.pl

@@@ -4932,6 -4932,7 +4932,6 @@@ if ( C4::Context->preference("Version"
      SetVersion($DBversion);
  }
  
 -
  $DBversion = "3.07.00.029";
  if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
      my $installer = C4::Installer->new();
@@@ -4966,7 -4967,7 +4966,7 @@@ if (C4::Context->preference("Version") 
      SetVersion ($DBversion);
  }
  
- $DBversion = "3.07.99.032";
+ $DBversion = "3.07.00.032";
  if ( C4::Context->preference("Version") lt TransformToNum($DBversion) ) {
      $dbh->do("ALTER TABLE virtualshelves MODIFY COLUMN owner int"); #should have been int already (fk to borrowers)
      $dbh->do("UPDATE virtualshelves vi LEFT JOIN borrowers bo ON bo.borrowernumber=vi.owner SET vi.owner=NULL where bo.borrowernumber IS NULL"); #before adding the constraint on borrowernumber, we need to get rid of deleted owners
      SetVersion($DBversion);
  }
  
 +$DBversion = "XXX";
 +if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
 +    $dbh->do("ALTER TABLE issues CHANGE date_due date_due datetime");
 +    $dbh->do("ALTER TABLE issues CHANGE returndate returndate datetime");
 +    $dbh->do("ALTER TABLE issues CHANGE lastreneweddate lastreneweddate datetime");
 +    $dbh->do("ALTER TABLE issues CHANGE issuedate issuedate datetime");
 +    $dbh->do("ALTER TABLE old_issues CHANGE date_due date_due datetime");
 +    $dbh->do("ALTER TABLE old_issues CHANGE returndate returndate datetime");
 +    $dbh->do("ALTER TABLE old_issues CHANGE lastreneweddate lastreneweddate datetime");
 +    $dbh->do("ALTER TABLE old_issues CHANGE issuedate issuedate datetime");
 +    print "Upgrade to $DBversion done (Setting up issues tables for hourly loans)\n";
 +    SetVersion($DBversion);
 +}
 +
  =head1 FUNCTIONS
  
  =head2 DropAllForeignKeys($table)