View | Details | Raw Unified | Return to bug 39171
Collapse All | Expand All

(-)a/installer/data/mysql/atomicupdate/bug_39171-rename_IS02709_ElasticsearchMarcFormat_to_base64ISO2709.pl (-7 / +10 lines)
Lines 1-14 Link Here
1
use Modern::Perl;
1
use Modern::Perl;
2
2
3
return {
3
return {
4
    bug_number => "39171",
4
    bug_number  => "39171",
5
    description => "Rename ElasticsearchMARCFormat syspref options",
5
    description => "Rename ElasticsearchMARCFormat syspref options",
6
    up => sub {
6
    up          => sub {
7
        my ($args) = @_;
7
        my ($args) = @_;
8
        my ($dbh, $out) = @$args{qw(dbh out)};
8
        my ( $dbh, $out ) = @$args{qw(dbh out)};
9
9
10
        $dbh->do(q{ UPDATE systempreferences SET options = 'base64ISO2709|ARRAY' WHERE variable = 'ElasticsearchMARCFormat' });
10
        $dbh->do(
11
        $dbh->do(q{ UPDATE systempreferences SET value = 'base64ISO2709' WHERE variable = 'ElasticsearchMARCFormat' AND value = 'ISO2709' });
11
            q{ UPDATE systempreferences SET options = 'base64ISO2709|ARRAY' WHERE variable = 'ElasticsearchMARCFormat' }
12
        );
13
        $dbh->do(
14
            q{ UPDATE systempreferences SET value = 'base64ISO2709' WHERE variable = 'ElasticsearchMARCFormat' AND value = 'ISO2709' }
15
        );
12
        say $out "Renamed options for 'ElasticsearchMARCFormat' system preference";
16
        say $out "Renamed options for 'ElasticsearchMARCFormat' system preference";
13
    },
17
    },
14
}
18
    }
15
- 

Return to bug 39171