Redigerer Modul:Oppdaget

local p = {}
 
-- Return tidspunkt for oppdagelse til artikkelen
function p.ulenket(frame)
	if not mw.wikibase then
		return ""
	end
	local artikkel = mw.wikibase.getEntityObject()
	if not artikkel then
		return "[[Kategori:Artikler som ikke er koblet til Wikidata]]"
	end
	local claims = artikkel.claims
	if not claims then
		return "[[Kategori:Artikler som mangler utsagn på Wikidata]]"
	end
	local p575 = artikkel.claims.P575
	if not p575 then
		return ""
	end
	local oppdaget = artikkel.claims.P575[1].mainsnak.datavalue.value["time"]
	oppdaget = string.sub(oppdaget,2,11)
	if not oppdaget then
		return ""
	end
	return oppdaget
end
function p.kategori(frame)
	if not mw.wikibase then
		return ""
	end
	local artikkel = mw.wikibase.getEntityObject()
	if not artikkel then
		return "[[Kategori:Artikler som ikke er koblet til Wikidata]]"
	end
	local claims = artikkel.claims
	if not claims then
		return "[[Kategori:Artikler som mangler utsagn på Wikidata]]"
	end
	local p575 = artikkel.claims.P575
	if not p575 then
		return ""
	end

	local oppdaget = artikkel.claims.P575[1].mainsnak.datavalue.value["time"]
	oppdaget = string.sub(oppdaget,2,11)
	kategori = string.sub(oppdaget,1,4)
	if not oppdaget then
		return ""
	end
	return '[[Kategori:Himmellegemer oppdaget i ' .. kategori .. ']]'
end

return p