bug 3440 followup: tweak updatedatabase.pl
authorGalen Charlton <gmcharlt@gmail.com>
Sat, 1 Aug 2009 13:56:51 +0000 (09:56 -0400)
committerHenri-Damien LAURENT <henridamien.laurent@biblibre.com>
Wed, 12 Aug 2009 11:53:43 +0000 (13:53 +0200)
[1] Removed POD: not a bad idea, but if we do it,
    there should be more substance to the messages
[2] Improved description of change
[3] Removed extra 'my' qualifier.

Signed-off-by: Galen Charlton <gmcharlt@gmail.com>
installer/data/mysql/updatedatabase.pl

index ea126f8..d6ccd0a 100755 (executable)
@@ -2467,13 +2467,7 @@ if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
     print "Upgrade to $DBversion done (added FilterBeforeOverdueReport syspref and new index on authorised_values)\n";
 }
 
-=item
-
-    Deal with branches
-
-=cut
-
-my $DBversion = "3.01.00.038";
+$DBversion = "3.01.00.038";
 if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
     # update branches table
     # 
@@ -2482,7 +2476,7 @@ if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
     $dbh->do("ALTER TABLE branches ADD `branchcountry` text AFTER `branchcity`");
     $dbh->do("ALTER TABLE branches ADD `branchurl` mediumtext AFTER `branchemail`");
     $dbh->do("ALTER TABLE branches ADD `branchnotes` mediumtext AFTER `branchprinter`");
-    print "Upgrade to $DBversion done (branches)\n";
+    print "Upgrade to $DBversion done (add ZIP, city, country, URL, and notes column to branches)\n";
     SetVersion ($DBversion);
 }