|
Lines 23421-23534
if( CheckVersion( $DBversion ) ) {
Link Here
|
| 23421 |
NewVersion( $DBversion, "", "Koha 20.11.00 release" ); |
23421 |
NewVersion( $DBversion, "", "Koha 20.11.00 release" ); |
| 23422 |
} |
23422 |
} |
| 23423 |
|
23423 |
|
| 23424 |
our $db_entries = [ |
|
|
| 23425 |
{ |
| 23426 |
version => '20.12.00.000', |
| 23427 |
bug_number => undef, |
| 23428 |
description => "Sorry, this is my first life, I am still learning!", |
| 23429 |
}, |
| 23430 |
{ |
| 23431 |
version => '20.12.00.001', |
| 23432 |
bug_number => 27252, |
| 23433 |
description => "Add ElasticsearchCrossFields system preference", |
| 23434 |
sub => sub { |
| 23435 |
$dbh->do( |
| 23436 |
q{ |
| 23437 |
INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES |
| 23438 |
('ElasticsearchCrossFields', '1', '', 'Enable "cross_fields" option for searches using Elastic search.', 'YesNo') |
| 23439 |
} |
| 23440 |
); |
| 23441 |
} |
| 23442 |
}, |
| 23443 |
{ |
| 23444 |
version => '20.12.00.002', |
| 23445 |
bug_number => 27351, |
| 23446 |
description => "Set type for UsageStatsCountry to Choice", |
| 23447 |
sub => sub { |
| 23448 |
$dbh->do( |
| 23449 |
q{UPDATE systempreferences SET `type` = 'Choice' WHERE `variable` = 'UsageStatsCountry'} |
| 23450 |
); |
| 23451 |
} |
| 23452 |
}, |
| 23453 |
{ |
| 23454 |
version => '20.12.00.003', |
| 23455 |
bug_number => 27349, |
| 23456 |
description => "Update type for Mana system preference to Choice", |
| 23457 |
sub => sub { |
| 23458 |
$dbh->do( |
| 23459 |
q{UPDATE systempreferences SET `type` = 'Choice' WHERE `variable` = 'Mana'} |
| 23460 |
); |
| 23461 |
} |
| 23462 |
}, |
| 23463 |
{ |
| 23464 |
version => '20.12.00.004', |
| 23465 |
bug_number => 27485, |
| 23466 |
description => "Rename system preference 'gist' to 'TaxRates'", |
| 23467 |
sub => sub { |
| 23468 |
$dbh->do( |
| 23469 |
q{UPDATE systempreferences set variable="TaxRates" WHERE variable="gist"} |
| 23470 |
); |
| 23471 |
}, |
| 23472 |
}, |
| 23473 |
|
| 23474 |
{ |
| 23475 |
version => '20.12.00.005', |
| 23476 |
bug_number => 27491, |
| 23477 |
description => "Rename system preference 'opaclanguages' to 'OPACLanguages'", |
| 23478 |
sub => sub { |
| 23479 |
$dbh->do( |
| 23480 |
q{UPDATE systempreferences set variable="OPACLanguages" WHERE variable="opaclanguages"} |
| 23481 |
); |
| 23482 |
} |
| 23483 |
}, |
| 23484 |
{ |
| 23485 |
version => '20.12.00.006', |
| 23486 |
bug_number => 27487, |
| 23487 |
description => "Rename system preference 'reviewson' to 'OPACComments'", |
| 23488 |
sub => sub { |
| 23489 |
$dbh->do( |
| 23490 |
q{UPDATE systempreferences SET variable="OPACComments" WHERE variable="reviewson" } |
| 23491 |
); |
| 23492 |
} |
| 23493 |
}, |
| 23494 |
{ |
| 23495 |
version => '20.12.00.007', |
| 23496 |
bug_number => 27486, |
| 23497 |
description => "Renaming system preference 'delimiter' to 'CSVDelimiter'", |
| 23498 |
sub => sub { |
| 23499 |
$dbh->do( |
| 23500 |
q{UPDATE systempreferences set variable="CSVDelimiter" WHERE variable="delimiter"} |
| 23501 |
); |
| 23502 |
} |
| 23503 |
}, |
| 23504 |
{ |
| 23505 |
version => '20.12.00.008', |
| 23506 |
bug_number => 25552, |
| 23507 |
description => "Add missing Claims Returned option to MarkLostItemsAsReturned", |
| 23508 |
sub => sub { |
| 23509 |
$dbh->do(q{ |
| 23510 |
UPDATE systempreferences |
| 23511 |
SET options = "claim_returned|batchmod|moredetail|cronjob|additem|pendingreserves|onpayment" |
| 23512 |
WHERE variable = "MarkLostItemsAsReturned"; |
| 23513 |
}); |
| 23514 |
} |
| 23515 |
}, |
| 23516 |
{ |
| 23517 |
version => '20.12.00.009', |
| 23518 |
bug_number => 42424, |
| 23519 |
description => "Testing failure", |
| 23520 |
sub => sub { |
| 23521 |
$dbh->do(q{ALTER TABLE foo}); |
| 23522 |
} |
| 23523 |
}, |
| 23524 |
|
| 23525 |
]; |
| 23526 |
|
| 23527 |
|
| 23528 |
sub get_db_entries { return $db_entries; } |
| 23529 |
|
| 23530 |
unless ( $ENV{HTTP_HOST} ) { # Is that correct? |
23424 |
unless ( $ENV{HTTP_HOST} ) { # Is that correct? |
| 23531 |
my $report = update( $db_entries ); |
23425 |
my $modules = C4::Installer::get_db_entries; |
|
|
23426 |
my $report = update( $modules ); |
| 23532 |
|
23427 |
|
| 23533 |
for my $s ( @{ $report->{success} } ) { |
23428 |
for my $s ( @{ $report->{success} } ) { |
| 23534 |
say $s->{output}; |
23429 |
say $s->{output}; |