installer/data/mysql/db_revs/220600025.pl

   1 use Modern::Perl;
   2
   3 return {
   4     bug_number => "14364",
   5     description => "Allow automatically canceled expired waiting holds to fill the next hold",
   6     up => sub {
   7         my ($args) = @_;
   8         my ($dbh, $out) = @$args{qw(dbh out)};
   9         $dbh->do(q{
  10             INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` ) VALUES
  11             ('ExpireReservesAutoFill','0',NULL,'Automatically fill the next hold with a automatically canceled expired waiting hold.','YesNo'),
  12             ('ExpireReservesAutoFillEmail','', NULL,'. Send email notification of hold filled from automatically expired/cancelled hold to this address. If not defined, Koha will fallback to the library reply-to address','Free');
  13         });
  14         say $out "Added ExpireReservesAutoFill system preferences";
  15
  16         $dbh->do(q{
  17         INSERT IGNORE INTO letter(module,code,branchcode,name,is_html,title,content,message_transport_type)
  18         VALUES ( 'reserves', 'HOLD_CHANGED', '', 'Canceled hold available for different patron', '0', 'Canceled hold available for different patron', 'The patron picking up <<biblio.title>> (<<items.barcode>>) has changed to <<borrowers.firstname>> <<borrowers.surname>> (<<borrowers.cardnumber>>).
  19
  20 Please update the hold information for this item.
  21
  22 Title: <<biblio.title>>
  23 Author: <<biblio.author>>
  24 Item: <<items.itemcallnumber>>
  25 Pickup location: <<branches.branchname>>', 'email');
  26         });
  27         say $out "Added HOLD_CHANGED notice";
  28     },
  29 };