Koha/installer/data/mysql/db_revs/210600001.pl
Jonathan Druart 8b0a44dcb5 Bug 25078: Explicitely return from DB revs to avoid warnings
% perl -wc installer/data/mysql/atomicupdate/skeleton.pl
Useless use of anonymous hash ({}) in void context at installer/data/mysql/atomicupdate/skeleton.pl

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
2021-08-18 12:59:35 +02:00

13 lines
331 B
Perl
Executable file

use Modern::Perl;
return {
bug_number => "28489",
description => "Modify sessions.a_session from longtext to longblob",
up => sub {
my ($args) = @_;
my $dbh = $args->{dbh};
$dbh->do('DELETE FROM sessions');
$dbh->do('ALTER TABLE sessions MODIFY a_session LONGBLOB NOT NULL');
},
}