Here comes a patch for update database.
Can you please test and tell me if it works ?

Thanks a lot
---
 installer/data/mysql/updatedatabase.pl |   13 ++++++-------
 1 files changed, 6 insertions(+), 7 deletions(-)

diff --git a/installer/data/mysql/updatedatabase.pl 
b/installer/data/mysql/updatedatabase.pl
index 4e1d1cf..fae5597 100755
--- a/installer/data/mysql/updatedatabase.pl
+++ b/installer/data/mysql/updatedatabase.pl
@@ -2733,7 +2733,11 @@ if (C4::Context->preference("Version") < 
TransformToNum($DBversion)) {
 
 $DBversion = '3.01.00.066';
 if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
-    $dbh->do('ALTER TABLE issuingrules ADD COLUMN `reservesallowed` 
smallint(6) NOT NULL default "0" AFTER `renewalsallowed`;');
+       $dbh->do("ALTER TABLE issuingrules 
+                       ADD COLUMN `finedays` int(11) default NULL AFTER `fine`,
+                       ADD COLUMN `renewalsallowed` smallint(6) default NULL, 
+                       ADD COLUMN `reservesallowed` smallint(6) default NULL;
+                       ");
     
     my $maxreserves = C4::Context->preference('maxreserves');
     $sth = $dbh->prepare('UPDATE issuingrules SET reservesallowed = ?;');
@@ -2756,11 +2760,6 @@ if (C4::Context->preference("Version") < 
TransformToNum($DBversion)) {
 
 $DBversion = "3.01.00.068";
 if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
-       $dbh->do("ALTER TABLE issuingrules ADD 
-                       COLUMN `finedays` int(11) default NULL AFTER `fine`,
-                       COLUMN `renewalsallowed` smallint(6) default NULL, 
-                       COLUMN `reservesallowed` smallint(6) default NULL,
-                       ");
        my $sth = $dbh->prepare("SELECT itemtype, renewalsallowed FROM 
itemtypes");
     $sth->execute();
        my $sthupd = $dbh->prepare("UPDATE issuingrules SET renewalsallowed = ? 
WHERE itemtype = ?");
@@ -2924,7 +2923,7 @@ ADDPERIODS
 
 
     $dbh->do(<<BUDGETNAME);
-ALTER TABLE aqbudget RENAME`aqbudgets` 
+ALTER TABLE aqbudget RENAME aqbudgets 
 BUDGETNAME
     my $maxbudgetid=$dbh->selectcol_arrayref(<<IDsBUDGET);
 SELECT MAX(aqbudgetid) from aqbudgets 
-- 
1.6.3.3

_______________________________________________
Koha-patches mailing list
Koha-patches@lists.koha.org
http://lists.koha.org/mailman/listinfo/koha-patches

Reply via email to