Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 26296: DBrev 21.12.00.004

Browse source 
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Fridolin Somers 2022-01-09 20:21:54 -10:00
parent 432f296b96
commit 3eb7480e0c
3 changed files with 16 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Koha.pm
View file

@ -29,7 +29,7 @@ use vars qw{ $VERSION };
# - #4 : the developer version. The 4th number is the database subversion.
# used by developers when the database changes. updatedatabase take care of the changes itself
# and is automatically called by Auth.pm when needed.
$VERSION = "21.12.00.003";
$VERSION = "21.12.00.004";
sub version {
return $VERSION;

15
installer/data/mysql/atomicupdate/bug_26296-Replace-comma-with-pipe-in-OPACSuggestion-preferences.perl
View file

@ -1,15 +0,0 @@
$DBversion = 'XXX'; # will be replaced by the RM
if( CheckVersion( $DBversion ) ) {
# you can use $dbh here like:
# $dbh->do( "ALTER TABLE biblio ADD COLUMN badtaste int" );
# or perform some test and warn
# if( !column_exists( 'biblio', 'biblionumber' ) ) {
# warn "There is something wrong";
# }
$dbh->do("UPDATE systempreferences SET value = REPLACE(value, ',', '|') WHERE variable IN ('OPACSuggestionMandatoryFields','OPACSuggestionUnwantedFields')");
# Always end with this (adjust the bug info)
NewVersion( $DBversion, 26296, "Replace comma with pipe in OPACSuggestion field preferences");
}

15
installer/data/mysql/db_revs/211200004.pl Executable file
View file

@ -0,0 +1,15 @@
use Modern::Perl;
return {
bug_number => "26296",
description => "Replace comma with pipe in OPACSuggestion field preferences",
up => sub {
my ($args) = @_;
my $dbh = $args->{dbh};
$dbh->do(q{
UPDATE systempreferences SET value = REPLACE(value, ',', '|')
WHERE variable IN ('OPACSuggestionMandatoryFields','OPACSuggestionUnwantedFields')
});
},
}