koha-dev.rot13.org Git - srvgit/blob - installer/data/mysql/atomicupdate/bug_29144.pl

   1 use Modern::Perl;
   2
   3 return {
   4     bug_number => 29144,
   5     description => "Copy and remove branches.opac_info",
   6     up => sub {
   7         my ($args) = @_;
   8         my ($dbh, $out) = @$args{qw(dbh out)};
   9         $dbh->do(q{
  10 INSERT IGNORE INTO additional_contents ( category,code,location,branchcode,title,content,lang,published_on )
  11 SELECT 'html_customizations', CONCAT('OpacLibraryInfo_', branches.branchcode), 'OpacLibraryInfo', branches.branchcode, branches.branchname, branches.opac_info, 'default', NOW()
  12 FROM branches
  13 WHERE branches.opac_info IS NOT NULL
  14         });
  15         $dbh->do(q{
  16 ALTER TABLE branches DROP COLUMN opac_info;
  17         });
  18     },
  19 };