Modul:Homokozó/JulesWinnfield-hu/Modul:Németországi járás települései

Homokozó/JulesWinnfield-hu/Modul:Németországi járás települései[mi ez?] • [dokumentáció: mutat, ] • [tesztek: létrehozás]

-- require"Modul:No globals"  -- enable when Wikidata module cleaned up
local wd = require"Modul:Wikidata"

local p = {}

local cats = {}

local function renderTrackingCategories()
	local result = {}
	for _, cat in ipairs(cats) do
		table.insert(result, "[[Kategória:" .. cat .. "]]")
	end
	return table.concat(result)
end

function p.main(frame)
	local district, title
	local item = mw.wikibase.getEntity()
	if wd.containsPropertyWithValue(item, "P31", "Q262166") then  -- Gemeinde
		local municipality = item
		if not municipality.claims.P131 then
			return ""
		end
		local statement
		for _, s in ipairs(municipality:getBestStatements"P131") do
			if s.mainsnak.snaktype == "value" then
				local item = mw.wikibase.getEntity("Q" .. s.mainsnak.datavalue.value["numeric-id"])
				if wd.containsPropertyWithValue(item, "P31", "Q106658") then  -- Landkreis
					if statement then
						table.insert(cats, "Tesztelés alatt álló sablon")
					end
					statement = s
					district = item
				end
			end
		end
		if not statement then
			return ""
		end
		title = wd.formatStatement(statement)
	elseif wd.containsPropertyWithValue(item, "P31", "Q106658") then  -- Landkreis
		district = item
		title = district:getLabel()
		if not title then
			title = district:getSitelink()
		end
	else
		return ""
	end
	if not district.claims.P150 then
		return ""
	end
	return require"Modul:Navbox"._navbox{
		navbar = "plain",
		title = title .. " települései",
		listclass = "hlist",
		state = "expanded",
		list1 = "*Egy\n*Kettő"
	} .. renderTrackingCategories()
end

return p