installer/data/mysql/atomicupdate/bug_6843_Renew_membership_from_expiry_or_current_date.pl

   1 #! /usr/bin/perl
   2 use strict;
   3 use warnings;
   4 use C4::Context;
   5 my $dbh=C4::Context->dbh;
   6 $dbh->do(<<ENDOFRENEWAL);
   7 INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('BorrowerRenewalPeriodBase', 'now', 'Set whether the borrower renewal date should be counted from the dateexpiry or from the current date ','dateexpiry|now','Choice');
   8 ENDOFRENEWAL
   9 print "Upgrade done (Added a system preference to allow renewal of Patron account either from todays date or from existing expiry date in the patrons account.)\n";