installer/data/mysql/db_revs/211200001.pl

   1 use Modern::Perl;
   2
   3 return {
   4     bug_number => "29586",
   5     description => "Add Hold Reminder messaging preference if missing",
   6     up => sub {
   7         my ($args) = @_;
   8         my ($dbh, $out) = @$args{qw(dbh out)};
   9         $dbh->do(q{
  10             INSERT IGNORE INTO `message_attributes`
  11                 (message_attribute_id, message_name, `takes_days`)
  12             VALUES (10, 'Hold_Reminder', 0)
  13         });
  14         $dbh->do(q{
  15             INSERT IGNORE INTO `message_transports`
  16                 (`message_attribute_id`, `message_transport_type`, `is_digest`, `letter_module`, `letter_code`)
  17             VALUES  (10, 'email', 0, 'circulation', 'HOLD_REMINDER'),
  18                     (10, 'sms', 0, 'circulation', 'HOLD_REMINDER'),
  19                     (10, 'phone', 0, 'circulation', 'HOLD_REMINDER'),
  20                     (10, 'itiva', 0, 'circulation', 'HOLD_REMINDER')
  21         });
  22     },
  23 }