installer/data/mysql/atomicupdate/bug_21336b.perl

   1 $DBversion = 'XXX';  # will be replaced by the RM
   2 if( CheckVersion( $DBversion ) ) {
   3     $dbh->do( q|
   4 INSERT IGNORE INTO systempreferences ( `variable`, `value`, `options`, `explanation`, `type` )
   5 VALUES
   6 ('UnsubscribeReflectionDelay','',NULL,'Delay for locking unsubscribers', 'Integer'),
   7 ('PatronAnonymizeDelay','',NULL,'Delay for anonymizing patrons', 'Integer'),
   8 ('PatronRemovalDelay','',NULL,'Delay for removing anonymized patrons', 'Integer')
   9     |);
  10     SetVersion( $DBversion );
  11     print "Upgrade to $DBversion done (Bug 21336 - Add preferences)\n";
  12 }