Koha/installer/data/mysql/db_revs/221200013.pl
Tomas Cohen Arazi 919197f517
23.05.00: Fix db_revs
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>
2023-05-31 16:09:49 -03:00

24 lines
895 B
Perl
Executable file

use Modern::Perl;
return {
bug_number => "32057",
description => "Add optional stack trace to action logs",
up => sub {
my ($args) = @_;
my ($dbh, $out) = @$args{qw(dbh out)};
if ( !column_exists( 'action_logs', 'trace' ) ) {
$dbh->do(q{
ALTER TABLE action_logs
ADD COLUMN `trace` TEXT DEFAULT NULL COMMENT 'An optional stack trace enabled by ActionLogsTraceDepth' AFTER `script`
});
say $out "Added column 'action_logs.trace'";
}
$dbh->do(q{
INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
('ActionLogsTraceDepth', '0', '', 'Sets the maximum depth of the action logs stack trace', 'Integer')
});
say $out "Added new system preference 'ActionLogsTraceDepth'";
},
};