installer/data/mysql/atomicupdate/bug_23396.perl

   1 $DBversion = 'XXX';
   2 if( CheckVersion( $DBversion ) ) {
   3
   4     $dbh->do(q|
   5         INSERT IGNORE INTO keyboard_shortcuts (shortcut_name, shortcut_keys) VALUES
   6             ("insert_copyright","Alt-C"),
   7             ("insert_copyright_sound","Alt-P"),
   8             ("insert_delimiter","Ctrl-D"),
   9             ("subfield_help","Ctrl-H"),
  10             ("link_authorities","Shift-Ctrl-L"),
  11             ("delete_field","Ctrl-X"),
  12             ("delete_subfield","Shift-Ctrl-X"),
  13             ("new_line","Enter"),
  14             ("line_break","Shift-Enter"),
  15             ("next_position","Tab"),
  16             ("prev_position","Shift-Tab"),
  17             ("toggle_keyboard", "Shift-Ctrl-K")
  18     ;|);
  19
  20     SetVersion( $DBversion );
  21     print "Upgrade to $DBversion done (Bug 23396 - Fix missing keyboard_shortcuts table)\n";
  22 }