[Koha-patches] [PATCH] bug Fixing: updatedatabase

[Henri-Damien LAURENT]

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