Update yuipath syspref
authorFrederic Demians <f.demians@tamil.fr>
Fri, 18 Apr 2008 17:53:43 +0000 (19:53 +0200)
committerJoshua Ferraro <jmf@liblime.com>
Mon, 21 Apr 2008 16:17:33 +0000 (11:17 -0500)
If syspref points to online 2.3.1 YUI version, edit it to 2.5.1.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
installer/data/mysql/updatedatabase.pl
kohaversion.pl

index e8fedf1..e227701 100755 (executable)
@@ -1281,6 +1281,17 @@ if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
     SetVersion ($DBversion);
 }
 
+$DBversion = "3.00.00.070";
+if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
+    $sth = $dbh->prepare("SELECT value FROM systempreferences WHERE variable='yuipath'");
+    $sth->execute;
+    my ($value) = $sth->fetchrow;
+    $value =~ s/2.3.1/2.5.1/;
+    $dbh->do("UPDATE systempreferences SET value='$value' WHERE variable='yuipath';");
+       print "Update yuipath syspref to 2.5.1 if necessary\n";
+    SetVersion ($DBversion);
+}
+
 =item DropAllForeignKeys($table)
 
   Drop all foreign keys of the table $table
index 3660838..938e935 100644 (file)
@@ -10,7 +10,7 @@
 use strict;
 
 sub kohaversion {
-    our $VERSION = "3.00.00.069";
+    our $VERSION = "3.00.00.070";
     # version needs to be set this way
     # so that it can be picked up by Makefile.PL
     # during install