Module:Endangered Languages Project/sandbox - Revision history

MSGJ: try simp

2024-03-06T10:15:54Z

try simp

← Previous revision		Revision as of 10:15, 6 March 2024
Line 2:		Line 2:

	local elpf = "http://www.endangeredlanguages.com/lang/" -- or get P1630		local elpf = "http://www.endangeredlanguages.com/lang/" -- or get P1630
⚫	local make_display = function(elpc, elpn)
⚫	~~return~~ "[" .. elpf .. elpc .. " " .. elpn .. "]"
⚫	end

	local tidy_param = function(param)		local tidy_param = function(param)
Line 12:		Line 9:

	p.make_entry = function(frame)		p.make_entry = function(frame)
		⚫	local out = {}
		⚫	local make_display = function(elpc, elpn)
		⚫	if elpc and elpn then
		⚫	table.insert(out, "[" .. elpf .. elpc .. " " .. elpn .. "]")
		⚫	elseif elpc or elpn then
		⚫	table.insert(out, (elpc or "") .. (elpn or "") .. "[[Category:Language articles with missing ELP parameters]]")
		⚫	end
		⚫	end
	local elpname = tidy_param(frame.args.elpname)		local elpname = tidy_param(frame.args.elpname)
	local elpcode = tidy_param(frame.args.elpcode)		local elpcode = tidy_param(frame.args.elpcode)
	local qid = tidy_param((frame.args.qid or ""):upper()) or mw.wikibase.getEntityIdForCurrentPage()		local qid = tidy_param((frame.args.qid or ""):upper()) or mw.wikibase.getEntityIdForCurrentPage()
		⚫	make_display(elpcode, elpname)
⚫	local out = {}
⚫	if ~~elpcode~~ and ~~elpname~~ then
⚫	~~table.insert(out,~~ make_display(elpcode, elpname))
	end
	if qid then		if qid then
	local props = mw.wikibase.getBestStatements(qid, "P2192")		local props = mw.wikibase.getBestStatements(qid, "P2192")
Line 25:		Line 27:
	local elpc = v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value		local elpn = v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value
	if elpc ~~and~~ elpn ~~then~~		make_display(elpc, elpn)
	table.insert(out, make_display(elpc, elpn))
⚫	end
	end		end
	end		end
Line 36:		Line 36:
	elseif #out==1 then		elseif #out==1 then
	return out[1]		return out[1]
⚫	elseif ~~elpcode~~ or ~~elpname~~ then
⚫	~~return~~ (~~elpcode~~ or "") .. (~~elpname~~ or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end
	return ret
	end		end

MSGJ at 10:09, 6 March 2024

2024-03-06T10:09:43Z

← Previous revision		Revision as of 10:09, 6 March 2024
Line 23:		Line 23:
	if props[1] then		if props[1] then
	for _, v in ipairs(props) do		for _, v in ipairs(props) do
	local elpc = ~~elpcode or~~ v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = ~~elpname or~~ v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value		local elpn = v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value
	if elpc and elpn then		if elpc and elpn then
	table.insert(out, make_display(elpc, elpn))		table.insert(out, make_display(elpc, elpn))

MSGJ: allow local params to be supplemented by wikidata

2024-03-06T10:07:12Z

allow local params to be supplemented by wikidata

← Previous revision		Revision as of 10:07, 6 March 2024
Line 18:		Line 18:
	if elpcode and elpname then		if elpcode and elpname then
	table.insert(out, make_display(elpcode, elpname))		table.insert(out, make_display(elpcode, elpname))
			end
	else
	if qid then		if qid then
	local props = mw.wikibase.getBestStatements(qid, "P2192")		local props = mw.wikibase.getBestStatements(qid, "P2192")
	if props[1] then		if props[1] then
	for _, v in ipairs(props) do		for _, v in ipairs(props) do
	local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value		local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value
	if elpc and elpn then		if elpc and elpn then
	table.insert(out, make_display(elpc, elpn))		table.insert(out, make_display(elpc, elpn))
	end
	end		end
	end		end

MSGJ: try imp

2024-03-06T10:06:00Z

try imp

← Previous revision		Revision as of 10:06, 6 March 2024
Line 1:		Line 1:
	--[[
	Module:Endangered Languages Project
	--]]

	local p = {}		local p = {}

	local elpf = "http://www.endangeredlanguages.com/lang/" -- or get P1630		local elpf = "http://www.endangeredlanguages.com/lang/" -- or get P1630

	local make_display = function(elpc, elpn)		local make_display = function(elpc, elpn)
	return "[" .. elpf .. elpc .. " " .. elpn .. "]"		return "[" .. elpf .. elpc .. " " .. elpn .. "]"
Line 20:		Line 15:
	local elpcode = tidy_param(frame.args.elpcode)		local elpcode = tidy_param(frame.args.elpcode)
	local qid = tidy_param((frame.args.qid or ""):upper()) or mw.wikibase.getEntityIdForCurrentPage()		local qid = tidy_param((frame.args.qid or ""):upper()) or mw.wikibase.getEntityIdForCurrentPage()

	local out = {}		local out = {}
	if elpcode and elpname then		if elpcode and elpname then
Line 35:		Line 29:
	end		end
	end		end
⚫	elseif elpcode or elpname then
⚫	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end
	elseif elpcode or elpname then
	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end
	end		end

	local ret = ""		local ret = ""
	if #out > 1 then		if #out > 1 then
	~~ret =~~ frame:expandTemplate{title = "ubl", args = out}		return frame:expandTemplate{title = "ubl", args = out}
			elseif #out==1 then
	else
	~~ret =~~ out[1]		return out[1]
		⚫	elseif elpcode or elpname then
		⚫	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end

	return ret		return ret
	end		end

MSGJ: i not used

2024-03-06T09:57:14Z

i not used

← Previous revision		Revision as of 09:57, 6 March 2024
Line 28:		Line 28:
	local props = mw.wikibase.getBestStatements(qid, "P2192")		local props = mw.wikibase.getBestStatements(qid, "P2192")
	if props[1] then		if props[1] then
	for i, v in ipairs(props) do		for _, v in ipairs(props) do
	local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value		local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value

MSGJ: fix

2024-03-06T09:54:20Z

fix

← Previous revision		Revision as of 09:54, 6 March 2024
Line 23:		Line 23:
	local out = {}		local out = {}
	if elpcode and elpname then		if elpcode and elpname then
	table.insert(out, ~~ake_display~~(elpcode, elpname))		table.insert(out, make_display(elpcode, elpname))
	else		else
	if qid then		if qid then

MSGJ: simp?

2024-03-06T09:51:47Z

simp?

← Previous revision		Revision as of 09:51, 6 March 2024
Line 23:		Line 23:
	local out = {}		local out = {}
	if elpcode and elpname then		if elpcode and elpname then
	out~~[#out+1] =~~ ~~make_display~~(elpcode, elpname)		table.insert(out, ake_display(elpcode, elpname))
	else		else
	if qid then		if qid then
Line 32:		Line 32:
	local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value		local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value
	if elpc and elpn then		if elpc and elpn then
	out~~[#out+1] =~~ make_display(elpc, elpn)		table.insert(out, make_display(elpc, elpn))
	end		end
	end		end
Line 38:		Line 38:
	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"		return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end
			elseif elpcode or elpname then
	else
	if elpcode or elpname ~~then~~		return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end
	end		end
	end		end

MSGJ: check v.qualifiers

2024-03-06T09:40:49Z

check v.qualifiers

← Previous revision		Revision as of 09:40, 6 March 2024
Line 30:		Line 30:
	for i, v in ipairs(props) do		for i, v in ipairs(props) do
	local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = elpname or v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value		local elpn = elpname or v.qualifiers and v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value
	if elpc and elpn then		if elpc and elpn then
	out[#out+1] = make_display(elpc, elpn)		out[#out+1] = make_display(elpc, elpn)

MSGJ: check v.qualifiers.P1810

2024-03-06T09:39:00Z

check v.qualifiers.P1810

← Previous revision		Revision as of 09:39, 6 March 2024
Line 30:		Line 30:
	for i, v in ipairs(props) do		for i, v in ipairs(props) do
	local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = elpname or v.qualifiers["P1810"][1].datavalue and v.qualifiers["P1810"][1].datavalue.value		local elpn = elpname or v.qualifiers.P1810 and v.qualifiers.P1810[1].datavalue and v.qualifiers.P1810[1].datavalue.value
	if elpc and elpn then		if elpc and elpn then
	out[#out+1] = make_display(elpc, elpn)		out[#out+1] = make_display(elpc, elpn)

MSGJ: sync with live

2024-03-06T09:37:38Z

sync with live

← Previous revision		Revision as of 09:37, 6 March 2024
Line 24:		Line 24:
	if elpcode and elpname then		if elpcode and elpname then
	out[#out+1] = make_display(elpcode, elpname)		out[#out+1] = make_display(elpcode, elpname)
		⚫	else
	elseif qid then
	local props = mw.wikibase.getBestStatements(qid, "P2192")		if qid then
			local props = mw.wikibase.getBestStatements(qid, "P2192")
	if props[1] then		if props[1] then
	for i, v in ipairs(props) do		for i, v in ipairs(props) do
	local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value		local elpc = elpcode or v.mainsnak.datavalue and v.mainsnak.datavalue.value
	local elpn = elpname or v.qualifiers["P1810"][1].datavalue and v.qualifiers["P1810"][1].datavalue.value		local elpn = elpname or v.qualifiers["P1810"][1].datavalue and v.qualifiers["P1810"][1].datavalue.value
	if elpc and elpn then		if elpc and elpn then
	out[#out+1] = make_display(elpc, elpn)		out[#out+1] = make_display(elpc, elpn)
		⚫	end
	end		end
		⚫	elseif elpcode or elpname then
		⚫	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
			end
			else
		⚫	if elpcode or elpname then
		⚫	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end
⚫	elseif elpcode or elpname then
⚫	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
⚫	end
⚫	else
⚫	if elpcode or elpname then
⚫	return (elpcode or "") .. (elpname or "") .. "[[Category:Language articles with missing ELP parameters]]"
	end		end
	end		end