Modulo:Sandbox/ValterVB/AggettiviNaz

Da Wikipedia, l'enciclopedia libera.
Vai alla navigazione Vai alla ricerca
require('strict')
local getArgs = require('Module:Arguments').getArgs
local mWikidata = require('Modulo:Wikidata')
local p = {}

function p.main(frame)
	local t = getArgs(frame)
	local dato = t[1]
	local aggettivi = {}
	local ss
	local wdEtnico, wdAutori
	local genere, nome
	local ret
	wdEtnico = mWikidata._getClaims('P1549', { from = dato })

	ss = ''
	genere = ''
	if wdEtnico then
		for _, nome_abitanti in ipairs(wdEtnico) do
			nome = mWikidata._formatStatement(nome_abitanti, { includelang = 'it'} )
			if genere == nil then
				genere = 'n.d.'
			else
				if mWikidata._formatQualifiers(nome_abitanti, 'P518') == nil then
					genere = 'n.d.'
				else
					genere = mWikidata._formatQualifiers(nome_abitanti, 'P518')
				end
			end
			genere = nome .. ' (' .. genere .. ')' .. '<br/>'
			ss = ss .. (nome ~= '' and genere or '')
		end
	end
	return ss
end

return p