installer/data/mysql/atomicupdate/bug_35149-add-do-nothing-to-CircAutoPrintQuickSlip-syspref.pl

   1 use Modern::Perl;
   2
   3 return {
   4     bug_number  => "35149",
   5     description => "Add 'do nothing' option to CircAutoPrintQuickSlip syspref explanation",
   6     up          => sub {
   7         my ($args) = @_;
   8         my ( $dbh, $out ) = @$args{qw(dbh out)};
   9
  10         # Do you stuffs here
  11         $dbh->do(q{UPDATE `systempreferences` SET `explanation` = 'Choose what should happen when an empty barcode field is submitted in circulation: Display a print quick slip window, Display a print slip window, Do nothing, or Clear the screen.' WHERE `variable` = 'CircAutoPrintQuickSlip'});
  12
  13         say $out "Updated system preference 'CircAutoPrintQuickSlip'";
  14     },
  15 };