Module:Citation/CS1 - Revision history

Dan at 12:37, 11 December 2020

2020-12-11T12:37:27Z

← Older revision		Revision as of 07:37, 11 December 2020
Line 836:		Line 836:
	date = substitute (cfg.presentation['nowrap2'], {cap, cap2});		date = substitute (cfg.presentation['nowrap2'], {cap, cap2});
	end		end

	return date;		return date;
	end		end
Line 2,249:		Line 2,249:
	end		end

	local Year = ~~2005~~;		local Year = A['Year'];
	local PublicationDate = ~~2005~~;		local PublicationDate = A['PublicationDate'];
	local OrigYear = ~~2005~~;		local OrigYear = A['OrigYear'];
	local Date = ~~2005~~;		local Date = A['Date'];
	local LayDate = ~~2005~~;		local LayDate = A['LayDate'];
	------------------------------------------------- Get title data		------------------------------------------------- Get title data
	local Title = A['Title'];		local Title = A['Title'];

Dan at 12:35, 11 December 2020

2020-12-11T12:35:48Z

← Older revision		Revision as of 07:35, 11 December 2020
Line 836:		Line 836:
	date = substitute (cfg.presentation['nowrap2'], {cap, cap2});		date = substitute (cfg.presentation['nowrap2'], {cap, cap2});
	end		end
	~~date = '2005';~~
	return date;		return date;
	end		end
Line 2,249:		Line 2,249:
	end		end

	local Year = ~~A['Year']~~;		local Year = 2005;
	local PublicationDate = ~~A['PublicationDate']~~;		local PublicationDate = 2005;
	local OrigYear = ~~A['OrigYear']~~;		local OrigYear = 2005;
	local Date = ~~A['Date']~~;		local Date = 2005;
	local LayDate = ~~A['LayDate']~~;		local LayDate = 2005;
	------------------------------------------------- Get title data		------------------------------------------------- Get title data
	local Title = A['Title'];		local Title = A['Title'];

Dan at 12:28, 11 December 2020

2020-12-11T12:28:43Z

← Older revision		Revision as of 07:28, 11 December 2020
Line 836:		Line 836:
	date = substitute (cfg.presentation['nowrap2'], {cap, cap2});		date = substitute (cfg.presentation['nowrap2'], {cap, cap2});
	end		end
			date = '2005';
	return date;		return date;
	end		end

Dan at 12:17, 11 December 2020

2020-12-11T12:17:30Z

Show changes

Dan: Blanked the page

2020-12-11T12:16:24Z

Blanked the page

Show changes

Couchds at 03:20, 3 September 2019

2019-09-03T03:20:42Z

← Older revision		Revision as of 22:20, 2 September 2019
Line 1,675:		Line 1,675:
	end		end
	end		end
			if count > 1 then
	return 1, ~~true~~;		etal = true;
			else
			etal = false;
			end
			return 1, etal;
	end		end

Couchds at 03:17, 3 September 2019

2019-09-03T03:17:36Z

← Older revision		Revision as of 22:17, 2 September 2019
Line 1,661:		Line 1,661:

	local function get_display_names (max, count, list_name, etal)		local function get_display_names (max, count, list_name, etal)
	~~local border = 1;~~		if is_set (max) then
	if is_set (~~border~~) then		if 'etal' == max:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings
	if 'etal' == ~~border~~:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings		max = count + 1; -- number of authors + 1 so display all author name plus et al.
	~~border~~ = count + 1; -- number of authors + 1 so display all author name plus et al.
	etal = true; -- overrides value set by extract_names()		etal = true; -- overrides value set by extract_names()
	elseif ~~border~~:match ('^%d+$') then -- if is a string of numbers		elseif max:match ('^%d+$') then -- if is a string of numbers
	~~border~~ = tonumber (max); -- make it a number		max = tonumber (max); -- make it a number
	if ~~border~~ >= count then -- if \|display-xxxxors= value greater than or equal to number of authors/editors		if max >= count then -- if \|display-xxxxors= value greater than or equal to number of authors/editors
	add_maint_cat ('disp_name', cfg.special_case_translation [list_name]);		add_maint_cat ('disp_name', cfg.special_case_translation [list_name]);
	end		end
	else -- not a valid keyword or number		else -- not a valid keyword or number
	table.insert( z.message_tail, { set_error( 'invalid_param_val', {'display-' .. list_name, ~~border~~}, true ) } ); -- add error message		table.insert( z.message_tail, { set_error( 'invalid_param_val', {'display-' .. list_name, max}, true ) } ); -- add error message
	~~border~~ = nil; -- unset; as if \|display-xxxxors= had not been set		max = nil; -- unset; as if \|display-xxxxors= had not been set
	end		end
	end		end

	return ~~border~~, ~~etal~~;		return 1, true;
	end		end

Couchds at 03:13, 3 September 2019

2019-09-03T03:13:39Z

← Older revision		Revision as of 22:13, 2 September 2019
Line 1,659:		Line 1,659:

	]]		]]
	~~max = 1;~~
	local function get_display_names (max, count, list_name, etal)		local function get_display_names (max, count, list_name, etal)
	if is_set (~~max~~) then		local border = 1;
	if 'etal' == ~~max~~:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings		if is_set (border) then
	~~max~~ = count + 1; -- number of authors + 1 so display all author name plus et al.		if 'etal' == border:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings
			border = count + 1; -- number of authors + 1 so display all author name plus et al.
	etal = true; -- overrides value set by extract_names()		etal = true; -- overrides value set by extract_names()
	elseif ~~max~~:match ('^%d+$') then -- if is a string of numbers		elseif border:match ('^%d+$') then -- if is a string of numbers
	~~max~~ = tonumber (max); -- make it a number		border = tonumber (max); -- make it a number
	if ~~max~~ >= count then -- if \|display-xxxxors= value greater than or equal to number of authors/editors		if border >= count then -- if \|display-xxxxors= value greater than or equal to number of authors/editors
	add_maint_cat ('disp_name', cfg.special_case_translation [list_name]);		add_maint_cat ('disp_name', cfg.special_case_translation [list_name]);
	end		end
	else -- not a valid keyword or number		else -- not a valid keyword or number
	table.insert( z.message_tail, { set_error( 'invalid_param_val', {'display-' .. list_name, ~~max~~}, true ) } ); -- add error message		table.insert( z.message_tail, { set_error( 'invalid_param_val', {'display-' .. list_name, border}, true ) } ); -- add error message
	~~max~~ = nil; -- unset; as if \|display-xxxxors= had not been set		border = nil; -- unset; as if \|display-xxxxors= had not been set
	end		end
	end		end

	return ~~max~~, etal;		return border, etal;
	end		end

Couchds at 03:11, 3 September 2019

2019-09-03T03:11:27Z

← Older revision		Revision as of 22:11, 2 September 2019
Line 1,659:		Line 1,659:

	]]		]]
			max = 1;
	local function get_display_names (max, count, list_name, etal)		local function get_display_names (max, count, list_name, etal)
	~~max = 1;~~
	if is_set (max) then		if is_set (max) then
	if 'etal' == max:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings		if 'etal' == max:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings

Couchds at 03:09, 3 September 2019

2019-09-03T03:09:32Z

← Older revision		Revision as of 22:09, 2 September 2019
Line 1,661:		Line 1,661:

	local function get_display_names (max, count, list_name, etal)		local function get_display_names (max, count, list_name, etal)
			max = 1;
	if is_set (max) then		if is_set (max) then
	if 'etal' == max:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings		if 'etal' == max:lower():gsub("[ '%.]", '') then -- the :gsub() portion makes 'etal' from a variety of 'et al.' spellings and stylings