Roxanne: 1 revision imported

2024-04-03T12:59:27Z

1 revision imported

← Older revision		Revision as of 12:59, 3 April 2024
(No difference)

Roxanne: 1 revision imported

2024-04-03T12:32:14Z

1 revision imported

← Older revision		Revision as of 12:32, 3 April 2024
(No difference)

Wikipedia>Trappist the monk: julian date fix;

2024-03-31T15:52:31Z

julian date fix;

← Older revision		Revision as of 15:52, 31 March 2024
Line 327:		Line 327:
	input.year2 = tonumber (input.year2) or lang_object:parseFormattedNumber (input.year2); -- COinS dates are pseudo-ISO 8601 so convert to Arabic numerals		input.year2 = tonumber (input.year2) or lang_object:parseFormattedNumber (input.year2); -- COinS dates are pseudo-ISO 8601 so convert to Arabic numerals

	~~-- start temporary Julian / Gregorian calendar uncertainty detection~~		if ((1582 == input.year) and (10 > tonumber(input.month))) or (1582 > input.year) then -- if a Julian calendar date
	~~local year = input.year; -- this temporary code to determine the extent of sources dated to the Julian/Gregorian~~
	~~local month = tonumber(input.month); -- interstice 1 October 1582 – 1 January 1926~~
	~~local day = tonumber (input.day);~~
	if ~~(0 ~= day) and -- day must have a value for this to be a whole date~~
	(((1582 == year) and (10 ~~<= month) and (12~~ >~~= month)) or -- any whole 1582 date from 1 October to 31 December or~~
	(~~(1926 == year) and (1 ==~~ month) ~~and (1 == input.day~~)) or ~~-- 1 January 1926 or~~
	((1582 ~~< year) and (1925~~ >~~= year))) then -- any date 1 January 1583 – 31 December 1925~~
	~~tCOinS_date~~.~~inter_cal_cat = true; -- set category flag true~~
	~~end~~
	~~-- end temporary Julian / Gregorian calendar uncertainty detection~~
	~~if ((1582 == year) and (10 > month)) or (1582 >~~ year) then -- if a Julian calendar date
	tCOinS_date.rftdate = tostring (input.year); -- &rft.date gets year only		tCOinS_date.rftdate = tostring (input.year); -- &rft.date gets year only
	return; -- done		return; -- done
Line 1,163:		Line 1,152:
	--[[--------------------------< A R C H I V E _ D A T E _ C H E C K >------------------------------------------		--[[--------------------------< A R C H I V E _ D A T E _ C H E C K >------------------------------------------

	Compare value in \|archive-date= with the timestamp in Wayback machine urls. Emits an error message when \|archive-date=		Compare value in \|archive-date= with the timestamp in Wayback machine urls. Emits an error message with suggested
	does not match the timestamp.		date from the \|archive-url= timestamp in an appropriate format when the value in \|archive-date= does not match
			the timestamp.

			this function never called when any date in a cs1\|2 template has errors

			error message suggests new \|archive-date= value in an appropriate format specified by <df>. <df> is either
			\|df= or cfg.global_df in that order. If <df> is nil, suggested date has format from \|archive-date=. There is
			a caveat: when \|df=dmy or \|df=mdy, the reformatter leaves \|access-date= and \|archive-date= formats as they are.
			The error message suggested date is passed to the formatter as YYYY-MM-DD so when \|df=dmy or \|df=mdy, the format
			is not changed.

	]]		]]

	local function archive_date_check (archive_date, archive_url_timestamp)		local function archive_date_check (archive_date, archive_url_timestamp, df)
	local ~~good~~, ~~archive_date_ts = pcall~~ (~~lang_object.formatDate~~, ~~lang_object~~, '~~Ymd~~', ~~archive_date~~); -- \|archive-date= ~~value to YYYYMMDD~~ format		local archive_date_format = 'dmy-y'; -- holds the date format of date in \|archive-date; default to ymd; 'dmy' used here to spoof reformat_dates()
	-- local ~~archive_date_ts~~ = ~~lang_object:formatDate (~~'~~Ymd~~', ~~archive_date~~); -- \|archive-date= ~~value~~ to ~~YYYYMMDD~~ format
			for _, v_t in ipairs ({{'dMy', 'dmy-all'}, {'Mdy', 'mdy-all'}}) do -- is \|archive-date= format dmy or mdy?
			if archive_date:match (patterns[v_t[1]][1]) then -- does the pattern match?
			archive_date_format = cfg.keywords_xlate[v_t[2]]; -- get appropriate \|df= supported keyword from the i18n translator table
			break;
			end
			end

			local dates_t = {};
			dates_t['archive-date'] = {val=archive_date, name=''}; -- setup to call reformat_dates(); never called when errors so <name> unset as not needed
			reformat_dates (dates_t, 'dmy-y'); -- reformat \|archive-date= to ymd; 'dmy' used here to spoof reformat_dates()
			local archive_url_date = archive_url_timestamp:gsub ('(%d%d%d%d)(%d%d)(%d%d)%d*', '%1-%2-%3'); -- make ymd format date from timestamp

	if ~~good~~ then		if dates_t['archive-date'].val == archive_url_date then -- are the two dates the same
	~~if not archive_url_timestamp:find~~ (~~archive_date_ts~~, ~~1, true~~) ~~then~~ -- ~~plain text find~~; ~~begin search at position 1~~		return; -- yes, done
	set_message ('err_archive_date_url_ts_mismatch'); -- emit an error message		else
	~~end~~		dates_t['archive-date'] = {val=archive_url_date, name=''}; -- setup to call reformat_dates() with the timestamp date
			reformat_dates (dates_t, df or archive_date_format); -- reformat timestamp to format specified by <df> or format used in \|archive-date=
			archive_url_date = dates_t['archive-date'].val;
			set_message ('err_archive_date_url_ts_mismatch', archive_url_date); -- emit an error message
	end		end
	end		end

Project_+Jotunnheim>Rox: 1 revision imported

2023-08-23T19:01:41Z

1 revision imported

Show changes

Module:Citation/CS1/Date validation - Revision history

Roxanne: 1 revision imported

Roxanne: 1 revision imported

Wikipedia>Trappist the monk: julian date fix;

Project_+Jotunnheim>Rox: 1 revision imported