Rox: 1 revision imported

2026-01-18T08:24:37Z

1 revision imported

← Older revision		Revision as of 08:24, 18 January 2026
(No difference)

Wikipedia>Trappist the monk at 19:25, 17 January 2026

2026-01-17T19:25:14Z

Rox: 1 revision imported

2024-10-14T11:51:09Z

1 revision imported

← Older revision		Revision as of 11:51, 14 October 2024
(No difference)

Wikipedia>Trappist the monk: sync from sandbox;

2024-08-17T18:39:07Z

sync from sandbox;

Show changes

← Older revision		Revision as of 19:25, 17 January 2026
Line 229:		Line 229:
	end		end
	else		else
	month_length = days_in_month[month];		month_length = days_in_month[month] or 0; -- invalid month number is nil so default <month_length> to 0
	end		end

Line 398:		Line 398:
	local patterns_t = {		local patterns_t = {
	-- year-initial numerical year-month-day		-- year-initial numerical year-month-day
	['ymd'] = {'^(%d%d%d%d)%-(%d%d)%-(%d%d)$', 'y', 'm', 'd'},		['ymd'] = {'^([1-9]%d%d%d)%-(%d%d)%-(%d%d)$', 'y', 'm', 'd'},
	-- month-initial: month day, year		-- month-initial: month day, year
	['Mdy'] = {'^(%D-) +([1-9]%d?), +((%d%d%d%d?)%a?)$', 'm', 'd', 'a', 'y'},		['Mdy'] = {'^(%D-) +([1-9]%d?), +(([1-9]%d%d%d?)%a?)$', 'm', 'd', 'a', 'y'},
	-- month-initial day range: month day–day, year; days are separated by endash		-- month-initial day range: month day–day, year; days are separated by endash
	['Md-dy'] = {'^(%D-) +([1-9]%d?)[%-–]([1-9]%d?), +((%d%d%d%d)%a?)$', 'm', 'd', 'd2', 'a', 'y'},		['Md-dy'] = {'^(%D-) +([1-9]%d?)[%-–]([1-9]%d?), +(([1-9]%d%d%d?)%a?)$', 'm', 'd', 'd2', 'a', 'y'},
	-- day-initial: day month year		-- day-initial: day month year
	['dMy'] = {'^([1-9]%d?) +(%D-) +((%d%d%d%d?)%a?)$', 'd', 'm', 'a', 'y'},		['dMy'] = {'^([1-9]%d?) +(%D-) +(([1-9]%d%d%d?)%a?)$', 'd', 'm', 'a', 'y'},
	-- year-initial: year month day; day: 1 or 2 two digits, leading zero allowed; not supported at en.wiki		-- year-initial: year month day; day: 1 or 2 two digits, leading zero allowed; not supported at en.wiki
	-- ['yMd'] = {'^((%d%d%d%d?)%a?) +(%D-) +(%d%d?)$', 'a', 'y', 'm', 'd'},		-- ['yMd'] = {'^(([1-9]%d%d%d?)%a?) +(%D-) +(%d%d?)$', 'a', 'y', 'm', 'd'},
	-- day-range-initial: day–day month year; days are separated by endash		-- day-range-initial: day–day month year; days are separated by endash
	['d-dMy'] = {'^([1-9]%d?)[%-–]([1-9]%d?) +(%D-) +((%d%d%d%d)%a?)$', 'd', 'd2', 'm', 'a', 'y'},		['d-dMy'] = {'^([1-9]%d?)[%-–]([1-9]%d?) +(%D-) +(([1-9]%d%d%d?)%a?)$', 'd', 'd2', 'm', 'a', 'y'},
	-- day initial month-day-range: day month - day month year; uses spaced endash		-- day initial month-day-range: day month - day month year; uses spaced endash
	['dM-dMy'] = {'^([1-9]%d?) +(%D-) +[%-–] +([1-9]%d?) +(%D-) +((%d%d%d%d)%a?)$', 'd', 'm', 'd2', 'm2', 'a', 'y'},		['dM-dMy'] = {'^([1-9]%d?) +(%D-) +[%-–] +([1-9]%d?) +(%D-) +(([1-9]%d%d%d?)%a?)$', 'd', 'm', 'd2', 'm2', 'a', 'y'},
	-- month initial month-day-range: month day – month day, year; uses spaced endash		-- month initial month-day-range: month day – month day, year; uses spaced endash
	['Md-Mdy'] = {'^(%D-) +([1-9]%d?) +[%-–] +(%D-) +([1-9]%d?), +((%d%d%d%d)%a?)$','m', 'd', 'm2', 'd2', 'a', 'y'},		['Md-Mdy'] = {'^(%D-) +([1-9]%d?) +[%-–] +(%D-) +([1-9]%d?), +(([1-9]%d%d%d?)%a?)$','m', 'd', 'm2', 'd2', 'a', 'y'},
	-- day initial month-day-year-range: day month year - day month year; uses spaced endash		-- day initial month-day-year-range: day month year - day month year; uses spaced endash
	['dMy-dMy'] = {'^([1-9]%d?) +(%D-) +(%d%d%d%d) +[%-–] +([1-9]%d?) +(%D-) +((%d%d%d%d)%a?)$', 'd', 'm', 'y', 'd2', 'm2', 'a', 'y2'},		['dMy-dMy'] = {'^([1-9]%d?) +(%D-) +([1-9]%d%d%d?) +[%-–] +([1-9]%d?) +(%D-) +(([1-9]%d%d%d?)%a?)$', 'd', 'm', 'y', 'd2', 'm2', 'a', 'y2'},
	-- month initial month-day-year-range: month day, year – month day, year; uses spaced endash		-- month initial month-day-year-range: month day, year – month day, year; uses spaced endash
	['Mdy-Mdy'] = {'^(%D-) +([1-9]%d?), +(%d%d%d%d) +[%-–] +(%D-) +([1-9]%d?), +((%d%d%d%d)%a?)$', 'm', 'd', 'y', 'm2', 'd2', 'a', 'y2'},		['Mdy-Mdy'] = {'^(%D-) +([1-9]%d?), +([1-9]%d%d%d?) +[%-–] +(%D-) +([1-9]%d?), +(([1-9]%d%d%d?)%a?)$', 'm', 'd', 'y', 'm2', 'd2', 'a', 'y2'},

	-- these date formats cannot be converted, per se, but month name can be rendered short or long		-- these date formats cannot be converted, per se, but month name can be rendered short or long
	-- month/season year - month/season year; separated by spaced endash		-- month/season year - month/season year; separated by spaced endash
	['My-My'] = {'^(%D-) +(%d%d%d%d) +[%-–] +(%D-) +((%d%d%d%d)%a?)$', 'm', 'y', 'm2', 'a', 'y2'},		['My-My'] = {'^(%D-) +([1-9]%d%d%d?) +[%-–] +(%D-) +(([1-9]%d%d%d?)%a?)$', 'm', 'y', 'm2', 'a', 'y2'},
	-- month/season range year; months separated by endash		-- month/season range year; months separated by endash
	['M-My'] = {'^(%D-)[%-–](%D-) +((%d%d%d%d)%a?)$', 'm', 'm2', 'a', 'y'},		['M-My'] = {'^(%D-)[%-–](%D-) +(([1-9]%d%d%d?)%a?)$', 'm', 'm2', 'a', 'y'},
	-- month/season year or proper-name year; quarter year when First Quarter YYYY etc.		-- month/season year or proper-name year; quarter year when First Quarter YYYY etc.
	['My'] = {'^([^%d–]-) +((%d%d%d%d)%a?)$', 'm', 'a', 'y'}, -- this way because endash is a member of %D; %D- will match January–March 2019 when it shouldn't		['My'] = {'^([^%d–]-) +(([1-9]%d%d%d?)%a?)$', 'm', 'a', 'y'}, -- this way because endash is a member of %D; %D- will match January–March 2019 when it shouldn't

	-- these date formats cannot be converted		-- these date formats cannot be converted
	['Sy4-y2'] = {'^(%D-) +((%d%d)%d%d)[%-–]((%d%d)%a?)$'}, -- special case Winter/Summer year-year (YYYY-YY); year separated with unspaced endash		['Sy4-y2'] = {'^(%D-) +(([1-9]%d)%d%d)[%-–]((%d%d)%a?)$'}, -- special case Winter/Summer year-year (YYYY-YY); year separated with unspaced endash
	['Sy-y'] = {'^(%D-) +(%d%d%d%d)[%-–]((%d%d%d%d)%a?)$'}, -- special case Winter/Summer year-year; year separated with unspaced endash		['Sy-y'] = {'^(%D-) +([1-9]%d%d%d?)[%-–](([1-9]%d%d%d?)%a?)$'}, -- special case Winter/Summer year-year; year separated with unspaced endash
	['y-y'] = {'^(%d%d%d%d?)[%-–]((%d%d%d%d?)%a?)$'}, -- year range: YYY-YYY or YYY-YYYY or YYYY–YYYY; separated by unspaced endash; 100-9999		['y-y'] = {'^([1-9]%d%d%d?)[%-–](([1-9]%d%d%d?)%a?)$'}, -- year range: YYY-YYY or YYY-YYYY or YYYY–YYYY; separated by unspaced endash; 100-9999
	['y4-y2'] = {'^((%d%d)%d%d)[%-–]((%d%d)%a?)$'}, -- year range: YYYY–YY; separated by unspaced endash		['y4-y2'] = {'^(([1-9]%d)%d%d)[%-–]((%d%d)%a?)$'}, -- year range: YYYY–YY; separated by unspaced endash
	['y'] = {'^((%d%d%d%d?)%a?)$'}, -- year; here accept either YYY or YYYY		['y'] = {'^(([1-9]%d%d%d?)%a?)$'}, -- year; here accept either YYY or YYYY
	}		}

Line 716:		Line 716:
	elseif 'year' == k then		elseif 'year' == k then
	good_date = is_valid_year(year);		good_date = is_valid_year(year);
			else
			good_date = false;
	end		end
	elseif 'date' == k then -- if the parameter is \|date=		elseif 'date' == k then -- if the parameter is \|date=
Line 728:		Line 730:
	if v.val:match("^[1-9]%d%d%d?%a?$") then -- if \|year = 3 or 4 digits only with or without a CITEREF disambiguator		if v.val:match("^[1-9]%d%d%d?%a?$") then -- if \|year = 3 or 4 digits only with or without a CITEREF disambiguator
	good_date, anchor_year, COinS_date = true, v.val:match("((%d+)%a?)");		good_date, anchor_year, COinS_date = true, v.val:match("((%d+)%a?)");
			else
			good_date = false;
	end		end
	elseif 'pmc-embargo-date' == k then -- if the parameter is \|pmc-embargo-date=		elseif 'pmc-embargo-date' == k then -- if the parameter is \|pmc-embargo-date=
Line 793:		Line 797:
	year = year_string:match ('(%d%d%d%d?)');		year = year_string:match ('(%d%d%d%d?)');

	if date_string:match ('%d%d%d%d%-%d%d%-%d%d~~') and year_string:match ('%d%d%d%d%a~~') then --special case where both date and year are required YYYY-MM-DD and YYYYx		if date_string:match ('%d%d%d%d%-%d%d%-%d%d') then --special case where both date and year are required YYYY-MM-DD and YYYYx
	date1 = date_string:match ('(%d%d%d%d)');		date1 = date_string:match ('(%d%d%d%d)');
	year = year_string:match ('(%d%d%d%d)');		year = year_string:match ('(%d%d%d%d)');
	if year ~= date1 then		if year ~= date1 then
	result = 0; -- years don't match		result = 0; -- years don't match
	~~else~~		elseif year_string:match ('%d%d%d%d%a') then
	result = 2; -- years match; but because disambiguated, don't add to maint cat		result = 2; -- years match; but because disambiguated, don't add to maint cat
	end		end
Line 1,225:		Line 1,229:
	date_name_xlate = date_name_xlate,		date_name_xlate = date_name_xlate,
	dates = dates,		dates = dates,
			is_valid_date = is_valid_date,
	reformat_dates = reformat_dates,		reformat_dates = reformat_dates,
	set_selected_modules = set_selected_modules,		set_selected_modules = set_selected_modules,

Module:Citation/CS1/Date validation - Revision history

Rox: 1 revision imported

Wikipedia>Trappist the monk at 19:25, 17 January 2026

Rox: 1 revision imported

Wikipedia>Trappist the monk: sync from sandbox;