From 8ba274f867282fa08c826bc7187bc301c5d3b2ca Mon Sep 17 00:00:00 2001 From: Andrew Fuerste Henry Date: Mon, 9 Dec 2024 17:59:25 +0000 Subject: [PATCH] Bug 38522: followup to preserve comment in sql structure This patch contains a new database update that corrects the missing comment in the schema structure. --- .../bug_38522_followup_define_comment.pl | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100755 installer/data/mysql/atomicupdate/bug_38522_followup_define_comment.pl diff --git a/installer/data/mysql/atomicupdate/bug_38522_followup_define_comment.pl b/installer/data/mysql/atomicupdate/bug_38522_followup_define_comment.pl new file mode 100755 index 0000000000..800b853976 --- /dev/null +++ b/installer/data/mysql/atomicupdate/bug_38522_followup_define_comment.pl @@ -0,0 +1,16 @@ +use Modern::Perl; +use Koha::Installer::Output qw(say_warning say_success say_info); + +return { + bug_number => "38522", + description => "increase erm_agreements.license_info length and preserve comment", + up => sub { + my ($args) = @_; + my ( $dbh, $out ) = @$args{qw(dbh out)}; + + # Do you stuffs here + $dbh->do(q{ALTER TABLE erm_agreements MODIFY COLUMN license_info mediumtext DEFAULT NULL COMMENT 'info about the license'}); + + say_success( $out, "Set erm_agreements.license_info to type mediumtext." ); + }, +}; -- 2.39.5