Modul:IPA/category documentation

Dokumentacija modula

Implements Predloga:IPA language category.

require('strict')

local p = {}
local lects = mw.loadData('Modul:IPA/data/export')
local mLang = require('Modul:Lang')
mw.ustring = require('ustring') 

function p.main(frame)
	local args = {}
	for k, v in pairs(frame:getParent().args) do
		if v ~= '' then
			args[k] = v
		end
	end
	local name = mw.ustring.sub(mw.title.getCurrentTitle().text, 22, -5)
	local lect, parent
	local code = args.code
	if not code then
		for _, lect2 in ipairs(lects) do
			if (lect2.name or lect2.extName) == name then
				lect = lect2
				parent = lect.parent
				code = lect.code
				break
			end
		end
	end
	if not code then
		code = mLang._tag_from_name({ name })
		if code:find('^<span') then
			code = nil
		else
			local regionCode = code:match('-(.+)')
			if regionCode and regionCode:sub(1, 2) ~= 'x-' then
				code = code:sub(1, #code - #regionCode) .. regionCode:upper()
			end
			for _, lect2 in ipairs(lects) do
				if lect2.code == code then
					lect = lect2
					parent = lect.parent
					break
				end
			end
		end
	end
	local isCollective = name:find(' languages$') and true
	local link = lect and (lect.link or lect.generatedLink or lect.extLink) or
		parent and (parent.link or parent.generatedLink or parent.extLink) or
		isCollective and name or
		name .. ''
	local key = lect and lect.key or parent and parent.key
	local langCat, langCatCount
	if code then
		langCat = mLang._category_from_tag({ code })
		if langCat:find('^<span') then
			langCat = nil
		else
			langCatCount = mw.site.stats.pagesInCategory(langCat:sub(10), 'pages')
		end
	end
	local parentName = args.parent or
		parent and (parent.name or parent.extName) or
		code and code:find('-') and mLang._name_from_tag({ code:gsub('%-.*', '') })
	if parentName == name or
		parentName and parentName:find('^<span')
	then
		parentName = nil
	end
	local cat = args.cat ~= 'no' and (
		parentName and 'Strani, ki vsebujejo ' .. parentName .. ' IPA' or
			'Strani, ki vsebujejo IPA'
	)
	local sortkey = args.sort or
		name:find('^[ %l]+$') and ' ' .. name or
		name
	local ret = {
		string.format(
			'Vsaka stran v tej kategoriji vsebuje [[%s|%s]] [[Mednarodna fonetična abeceda|IPA]] transkripcijo, ki uporablja %s. Te kategorije se nikoli ne sme dodajati ročno.',
			link,
			name,
			code
				and string.format('<code>{{[[Predloga:IPA|IPA]]|%s|...}}</code>', code)
				or '[[Predloga:IPA]]'
		)
	}
	if key then
		table.insert(ret, string.format(
			'Privzeto se transkripcije povezujejo s ključem [[%s]]. Transkripcije, ki ne upoštevajo konvencij ključa, morajo vsebovati parameter <code>|generic=yes</code>.',
			key
		))
	end
	if isCollective then
		table.insert(ret, string.format(
			'The %s are a language collective. Please replace the code%s with those of more specific languages where possible.',
			name,
			code and ' (' .. code .. ')' or ''
		))
	end
	if not code and args.container ~= 'yes' then
		table.insert(ret, string.format(
			'<small>Napaka dokumentacije: koda jezika za "%s" ne obstaja.</small>',
			name
		))
	end
	if args.content then
		table.insert(ret, args.content)
	end
	if langCat and langCatCount ~= 0 then
		table.insert(ret, string.format(
			'==Glej tudi==\n*[[:%s]] (%s)',
			langCat,
			mw.language.new('en'):formatNum(langCatCount)
		))
	end
	if cat then
		table.insert(ret, string.format('[[Kategorija:%s|%s]]', cat, sortkey))
	end
	return table.concat(ret, '\n\n')
end

return p