use Modern::Perl;

return {
    bug_number => 29144,
    description => "Copy and remove branches.opac_info",
    up => sub {
        my ($args) = @_;
        my ($dbh, $out) = @$args{qw(dbh out)};
        $dbh->do(q{
INSERT IGNORE INTO additional_contents ( category,code,location,branchcode,title,content,lang,published_on )
SELECT 'html_customizations', CONCAT('OpacLibraryInfo_', branches.branchcode), 'OpacLibraryInfo', branches.branchcode, branches.branchname, branches.opac_info, 'default', NOW()
FROM branches
WHERE branches.opac_info IS NOT NULL
        });
        $dbh->do(q{
ALTER TABLE branches DROP COLUMN opac_info;
        });
    },
};
