Bug 8207 follow-up: correct typo in authority types

Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
This commit is contained in:
Jared Camins-Esakov 2012-08-23 09:23:50 -04:00 committed by Paul Poulain
parent 98e9d1b311
commit 2e389ec02b
2 changed files with 11 additions and 3 deletions

View file

@ -5569,8 +5569,8 @@ if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
$DBversion = "3.09.00.028";
if (C4::Context->preference("Version") < TransformToNum($DBversion)) {
unless ( C4::Context->preference('marcflavour') eq 'UNIMARC' ) {
my %referencetypes = ( '00' => 'PERSO_CODE',
'10' => 'ORGO_CODE',
my %referencetypes = ( '00' => 'PERSO_NAME',
'10' => 'CORPO_NAME',
'11' => 'MEETI_NAME',
'30' => 'UNIF_TITLE',
'48' => 'CHRON_TERM',
@ -5664,6 +5664,14 @@ if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
SetVersion ($DBversion);
}
$DBversion ="3.09.00.034";
if(C4::Context->preference("Version") < TransformToNum($DBversion) ) {
$dbh->do("UPDATE auth_subfield_structure SET frameworkcode = 'PERSO_NAME' WHERE frameworkcode = 'PERSO_CODE'");
$dbh->do("UPDATE auth_subfield_structure SET frameworkcode = 'CORPO_NAME' WHERE frameworkcode = 'ORGO_CODE'");
print "Upgrade to $DBversion done (Bug 8207: correct typo in authority types)\n";
SetVersion($DBversion);
}
=head1 FUNCTIONS
=head2 TableExists($table)

View file

@ -16,7 +16,7 @@ the kohaversion is divided in 4 parts :
use strict;
sub kohaversion {
our $VERSION = '3.09.00.033';
our $VERSION = '3.09.00.034';
# version needs to be set this way
# so that it can be picked up by Makefile.PL
# during install