Module:Citation/CS1 - Revision history

Sushoff: 1 revision imported

2025-10-29T13:59:56Z

1 revision imported

← Older revision	Revision as of 13:59, 29 October 2025
(No difference)

en>Trappist the monk at 13:27, 2 September 2025

2025-09-02T13:27:48Z

Show changes

imported>Trappist the monk: sync from sandbox;

2025-04-12T13:48:53Z

sync from sandbox;

Show changes

Sushoff: Created page with "require ('strict'); ----------------------------< F O R W A R D D E C L A R A T I O N S >-------------------------------------- each of these counts against the Lua upvalue limit local validation; -- functions in Module:Citation/CS1/Date_validation local utilities; -- functions in Module:Citation/CS1/Utilities local z = {}; -- table of tables in Module:Citation/CS1/Utilities local identifiers; -- f..."

2025-02-01T12:35:09Z

Created page with "require ('strict'); --[[--------------------------< F O R W A R D D E C L A R A T I O N S >-------------------------------------- each of these counts against the Lua upvalue limit ]] local validation; -- functions in Module:Citation/CS1/Date_validation local utilities; -- functions in Module:Citation/CS1/Utilities local z = {}; -- table of tables in Module:Citation/CS1/Utilities local identifiers; -- f..."

← Older revision	Revision as of 12:35, 1 February 2025
(No difference)

imported>Trappist the monk: sync from sandbox;

2024-12-28T15:31:52Z

sync from sandbox;

← Older revision		Revision as of 15:31, 28 December 2024
Line 148:		Line 148:
	'%f[%w][%w][%w]%.%a%a+$', -- two character hostname and TLD		'%f[%w][%w][%w]%.%a%a+$', -- two character hostname and TLD
	'^%d%d?%d?%.%d%d?%d?%.%d%d?%d?%.%d%d?%d?', -- IPv4 address		'^%d%d?%d?%.%d%d?%d?%.%d%d?%d?%.%d%d?%d?', -- IPv4 address
			'[%a%d]+%:?' -- IPv6 address
	}		}

Line 245:		Line 246:
	local function link_param_ok (value)		local function link_param_ok (value)
	local scheme, domain;		local scheme, domain;
	if value:find ('[<>%[%]\|{}]') then -- if any prohibited characters		if value:find ('[<>%[%]\|{}]') then -- if any prohibited characters
	return false;		return false;
	end		end
Line 3,888:		Line 3,889:
	utilities.set_message ('maint_bot_unknown'); -- and add a category if not already added		utilities.set_message ('maint_bot_unknown'); -- and add a category if not already added
	else		else
	utilities.set_message ('maint_unfit'); -- and add a category if not already added		-- utilities.set_message ('maint_unfit'); -- and add a category if not already added
			utilities.add_prop_cat ('unfit'); -- and add a category if not already added
	end		end
	else -- UrlStatus is empty, 'dead'		else -- UrlStatus is empty, 'dead'
Line 4,205:		Line 4,207:
	for _, v in ipairs (z.error_cats_t) do -- append error categories		for _, v in ipairs (z.error_cats_t) do -- append error categories
	table.insert (render_t, utilities.substitute (cfg.messages[cat_wikilink], {v, sort_key}));		table.insert (render_t, utilities.substitute (cfg.messages[cat_wikilink], {v, sort_key}));
			end
			if cfg.id_limits_data_load_fail then -- boolean true when load failed
			utilities.set_message ('maint_id_limit_load_fail'); -- done here because this maint cat emits no message
	end		end
	for _, v in ipairs (z.maint_cats_t) do -- append maintenance categories		for _, v in ipairs (z.maint_cats_t) do -- append maintenance categories
	table.insert (render_t, utilities.substitute (cfg.messages[cat_wikilink], {v, sort_key}));		table.insert (render_t, utilities.substitute (cfg.messages[cat_wikilink], {v, sort_key}));
	end		end

	for _, v in ipairs (z.prop_cats_t) do -- append properties categories		for _, v in ipairs (z.prop_cats_t) do -- append properties categories
	table.insert (render_t, utilities.substitute (cfg.messages['cat wikilink'], v)); -- no sort keys		table.insert (render_t, utilities.substitute (cfg.messages['cat wikilink'], v)); -- no sort keys

imported>Trappist the monk: sync from sandbox;

2024-08-17T18:39:14Z

sync from sandbox;

← Older revision		Revision as of 18:39, 17 August 2024
Line 1,251:		Line 1,251:
	if one then -- if <one> has a value (name, mdash replacement, or mask text replacement)		if one then -- if <one> has a value (name, mdash replacement, or mask text replacement)
	local proj, tag = interwiki_prefixen_get (one, true); -- get the interwiki prefixen if present		local proj, tag = interwiki_prefixen_get (one, true); -- get the interwiki prefixen if present

	if 'w' == proj and ('Wikipedia' == mw.site.namespaces.Project['name']) then		if 'w' == proj and ('Wikipedia' == mw.site.namespaces.Project['name']) then
	proj = nil; -- for stuff like :w:de:<article>, :w is unnecessary TODO: maint cat?		proj = nil; -- for stuff like :w:de:<article>, :w is unnecessary TODO: maint cat?
	end		end
	if proj then		if proj then
	~~proj~~ = ({['d'] = 'Wikidata', ['s'] = 'Wikisource', ['w'] = 'Wikipedia'})[proj]; -- :w (wikipedia) for linking from a non-wikipedia project		local proj_name = ({['d'] = 'Wikidata', ['s'] = 'Wikisource', ['w'] = 'Wikipedia'})[proj]; -- :w (wikipedia) for linking from a non-wikipedia project
	if ~~proj~~ then		if proj_name then
	one = one .. utilities.wrap_style ('interproj', ~~proj~~); -- add resized leading space, brackets, static text, language name		one = one .. utilities.wrap_style ('interproj', proj_name); -- add resized leading space, brackets, static text, language name
			utilities.add_prop_cat ('interproj-linked-name', proj); -- categorize it; <proj> is sort key
	tag = nil; -- unset; don't do both project and language		tag = nil; -- unset; don't do both project and language
	end		end
Line 1,269:		Line 1,269:
	if lang then -- error messaging done in extract_names() where we know parameter names		if lang then -- error messaging done in extract_names() where we know parameter names
	one = one .. utilities.wrap_style ('interwiki', lang); -- add resized leading space, brackets, static text, language name		one = one .. utilities.wrap_style ('interwiki', lang); -- add resized leading space, brackets, static text, language name
			utilities.add_prop_cat ('interwiki-linked-name', tag); -- categorize it; <tag> is sort key
	end		end
	end		end
Line 3,158:		Line 3,159:
	local Year = A['Year'];		local Year = A['Year'];

			if utilities.is_set (Year) then
			validation.year_check (Year); -- returns nothing; emits maint message when \|year= doesn't hold a 'year' value
			end

	if not utilities.is_set (Date) then		if not utilities.is_set (Date) then
	Date = Year; -- promote Year to Date		Date = Year; -- promote Year to Date
Line 3,220:		Line 3,225:
	validation.year_date_check (Year, A:ORIGIN ('Year'), Date, A:ORIGIN ('Date'), error_list);		validation.year_date_check (Year, A:ORIGIN ('Year'), Date, A:ORIGIN ('Date'), error_list);
	end		end

	if 0 == #error_list then -- error free dates only; 0 when error_list is empty		if 0 == #error_list then -- error free dates only; 0 when error_list is empty
	local modified = false; -- flag		local modified = false; -- flag
Line 3,747:		Line 3,752:

	Series = utilities.is_set (Series) and wrap_msg ('series', {sepc, Series}) or ""; -- not the same as SeriesNum		Series = utilities.is_set (Series) and wrap_msg ('series', {sepc, Series}) or ""; -- not the same as SeriesNum
	local Agency = A['Agency'] or ''; -- \|agency= ~~only~~ supported in {{cite news}}, {{cite press release}}, {{cite web}} and certain {{citation}} templates		local Agency = A['Agency'] or ''; -- \|agency= is supported by {{cite magazine}}, {{cite news}}, {{cite press release}}, {{cite web}}, and certain {{citation}} templates
	if utilities.is_set (Agency) then -- this testing done here because {{citation}} supports 'news' citations		if utilities.is_set (Agency) then -- this testing done here because {{citation}} supports 'news' citations
	if utilities.in_array (config.CitationClass, {'news', 'pressrelease', 'web'}) or ('citation' == config.CitationClass and utilities.in_array (Periodical_origin, {"newspaper", "work"})) then		if utilities.in_array (config.CitationClass, {'magazine', 'news', 'pressrelease', 'web'}) or ('citation' == config.CitationClass and utilities.in_array (Periodical_origin, {"magazine", "newspaper", "work"})) then
	Agency = wrap_msg ('agency', {sepc, Agency}); -- format for rendering		Agency = wrap_msg ('agency', {sepc, Agency}); -- format for rendering
	else		else

imported>Trappist the monk: sync from sandbox;

2024-03-23T15:32:48Z

sync from sandbox;

Show changes

imported>Trappist the monk: sync from sandbox;

2023-11-25T16:42:17Z

sync from sandbox;

Show changes

imported>Trappist the monk: fix {{cs1 config}} support for |display-translators=;

2023-08-30T19:56:08Z

fix {{cs1 config}} support for |display-translators=;

← Older revision		Revision as of 19:56, 30 August 2023
Line 3,367:		Line 3,367:
	do -- now do translators		do -- now do translators
	if cfg.global_cs1_config_t['DisplayTranslators'] then -- global setting from {{cs1 config}} overrides local setting		if cfg.global_cs1_config_t['DisplayTranslators'] then -- global setting from {{cs1 config}} overrides local setting
	control.maximum, translator_etal = get_display_names (cfg.global_cs1_config_t['DisplayTranslators'], #t, 'translators', 'cs1 config');		control.maximum, translator_etal = get_display_names (cfg.global_cs1_config_t['DisplayTranslators'], #t, 'translators', translator_etal, 'cs1 config');
	else		else
	control.maximum, translator_etal = get_display_names (A['DisplayTranslators'], #t, 'translators', translator_etal, A:ORIGIN ('DisplayTranslators'));		control.maximum, translator_etal = get_display_names (A['DisplayTranslators'], #t, 'translators', translator_etal, A:ORIGIN ('DisplayTranslators'));

imported>Trappist the monk: sync from sandbox;

2023-08-12T19:19:13Z

sync from sandbox;

Show changes