Attachment #159097 for bug #26831

View | Details | Raw Unified | Return to bug 26831
Collapse All | Expand All




use Modern::Perl;

return {
    bug_number => "26831",
    description => "Add new system preference PurgeListShareInvitesOlderThan",
    up => sub {
        my ($args) = @_;
        my ($dbh, $out) = @$args{qw(dbh out)};

        $dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('PurgeListShareInvitesOlderThan', '14', NULL, 'If not empty, number of days used when deleting unaccepted list share invites', 'Integer') });
    },
};

Lines 601-606 INSERT INTO systempreferences ( `variable`, `value`, `options`, `explanation`, ` Link Here

(-)a/installer/data/mysql/mandatory/sysprefs.sql (+1 lines)
601	('Pseudonymization','0',NULL,'If enabled patrons and transactions will be copied in a separate table for statistics purpose','YesNo'),	601	('Pseudonymization','0',NULL,'If enabled patrons and transactions will be copied in a separate table for statistics purpose','YesNo'),
602	('PseudonymizationPatronFields','','title,city,state,zipcode,country,branchcode,categorycode,dateenrolled,sex,sort1,sort2','Patron fields to copy to the pseudonymized_transactions table','multiple'),	602	('PseudonymizationPatronFields','','title,city,state,zipcode,country,branchcode,categorycode,dateenrolled,sex,sort1,sort2','Patron fields to copy to the pseudonymized_transactions table','multiple'),
603	('PseudonymizationTransactionFields','','datetime,branchcode,transaction_type,itemnumber,itemtype,holdingbranch,location,itemcallnumber,ccode','Transaction fields to copy to the pseudonymized_transactions table','multiple'),	603	('PseudonymizationTransactionFields','','datetime,branchcode,transaction_type,itemnumber,itemtype,holdingbranch,location,itemcallnumber,ccode','Transaction fields to copy to the pseudonymized_transactions table','multiple'),
		604	('PurgeListShareInvitesOlderThan', '14', NULL, 'If not empty, number of days used when deleting unaccepted list share invites', 'Integer'),
604	('PurgeSuggestionsOlderThan', '', NULL, 'If this script is called without the days parameter', 'Integer'),	605	('PurgeSuggestionsOlderThan', '', NULL, 'If this script is called without the days parameter', 'Integer'),
605	('QueryAutoTruncate','1',NULL,'If ON, query truncation is enabled by default','YesNo'),	606	('QueryAutoTruncate','1',NULL,'If ON, query truncation is enabled by default','YesNo'),
606	('QueryFuzzy','1',NULL,'If ON, enables fuzzy option for searches','YesNo'),	607	('QueryFuzzy','1',NULL,'If ON, enables fuzzy option for searches','YesNo'),

Lines 640-645 OPAC: Link Here

(-)a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/opac.pref (-1 / +8 lines)
640	1: "Block"	640	1: "Block"
641	0: "Don't block"	641	0: "Don't block"
642	- expired patrons from OPAC actions such as placing a hold or renewing. Note that the setting for a patron category takes priority over this system preference.	642	- expired patrons from OPAC actions such as placing a hold or renewing. Note that the setting for a patron category takes priority over this system preference.
		643	-
		644	- The cleanup_database.pl cronjob will automatically delete unaccepted private list share invites after a period of
		645	- pref: PurgeListShareInvitesOlderThan
		646	class: integer
		647	- "days. Example: [14] Sets purgation of unaccepted private list share invites for those older than 14 days."
		648	- "<br><strong>WARNING</strong>: This system preference will be overridden when the cleanup_database.pl cronjob is run with the --list-invites parameter."
		649	- "<br>If neither the --list-invites parameter or this system preference are set then the cronjob will not delete any unaccepted private list share invites."
		650	- "<br><strong>Note:</strong> This system preference requires the <i>misc/cronjobs/cleanup_database.pl</i> cronjob. Ask your system administrator to schedule it."
643	-	651	-
644	- pref: OpacTrustedCheckout	652	- pref: OpacTrustedCheckout
645	default: 0	653	default: 0
646	-

Return to bug 26831

Line 0 Link Here

(-)a/installer/data/mysql/atomicupdate/bug_26831-add_PurgeListShareInvitesOlderThan_syspref.pl (+12 lines)
	1	use Modern::Perl;
	2
	3	return {
	4	bug_number => "26831",
	5	description => "Add new system preference PurgeListShareInvitesOlderThan",
	6	up => sub {
	7	my ($args) = @_;
	8	my ($dbh, $out) = @$args{qw(dbh out)};
	9
	10	$dbh->do(q{INSERT IGNORE INTO systempreferences (variable,value,options,explanation,type) VALUES ('PurgeListShareInvitesOlderThan', '14', NULL, 'If not empty, number of days used when deleting unaccepted list share invites', 'Integer') });
	11	},
	12	};