@@ -, +, @@ --- installer/data/mysql/atomicupdate/bug_30290.pl | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100755 installer/data/mysql/atomicupdate/bug_30290.pl --- a/installer/data/mysql/atomicupdate/bug_30290.pl +++ a/installer/data/mysql/atomicupdate/bug_30290.pl @@ -0,0 +1,16 @@ +use Modern::Perl; + +return { + bug_number => 30290, + description => "Modify AR notices, include TOC line", + up => sub { + my ($args) = @_; + my ($dbh, $out) = @$args{qw(dbh out)}; + my $sql = q| +UPDATE letter +SET content=REPLACE(content, '\nPages:', '\nTOC: [% IF article_request.toc_request %]Include TOC[% ELSE %]No[% END %]\nPages:') +WHERE code RLIKE '^AR_' AND module='circulation' AND content NOT RLIKE '\nTOC:'; + |; + $dbh->do( $sql ); + }, +}; --