installer/data/mysql/atomicupdate/bug_19349.perl

   1 $DBversion = 'XXX';
   2 if( CheckVersion( $DBversion ) ) {
   3     $dbh->do(q{
   4         INSERT IGNORE INTO systempreferences (`variable`, `value`, `options`, `explanation`, `type`) VALUES
   5         ('MarcFieldForCreatorId','',NULL,'Where to store the borrowernumber of the record''s creator','Free'),
   6         ('MarcFieldForCreatorName','',NULL,'Where to store the name of the record''s creator','Free'),
   7         ('MarcFieldForModifierId','',NULL,'Where to store the borrowernumber of the record''s last modifier','Free'),
   8         ('MarcFieldForModifierName','',NULL,'Where to store the name of the record''s last modifier','Free')
   9     });
  10
  11     SetVersion( $DBversion );
  12     print "Upgrade to $DBversion done (Bug 19349 - Add system preferences MarcFieldForCreatorId, MarcFieldForCreatorName, MarcFieldForModifierId, MarcFieldForModifierName)\n";
  13 }