Модуль:ExampleList

Для документации этого модуля может быть создана страница Модуль:ExampleList/doc

local p = {}

-- используется для того, чтобы можно было удалять элементы из таблицы
local function copy(other)
	local res = {}
	for k,v in pairs(other) do
		res[k] = v
	end
	return res
end

-- вызов шаблона, при ошибке возвращает пустую строку
local function expand(frame, tname, targs)
	local success, result = pcall(
		frame.expandTemplate,
		frame,
		{title = tname, args = targs}
	)
	if success then
		return result
	else
		return ''
	end
	--return frame:expandTemplate({title = tname, args = args})
end

function p.main(frame)
	if not getArgs then
		getArgs = require('Module:Arguments').getArgs
	end
	local trim = require('Module:Yesno')(frame:getParent().args._trim, false) or false --чтобы не было nil
	local args = copy(getArgs(frame, {trim = _trim, removeBlanks = false})) --copy(frame.args)
	local tname = args._template or args[1]
	local opener = args._opener or '* '
	local sep = args._sep
	local style = args._style
	
	if tname == '' or tname == nil then --при опущенном первом параметре берём имя шаблона из названия страницы
		tname = mw.language.new('ru'):lcfirst(mw.title.getCurrentTitle().rootText)
	end
	if args._template == nil then --имя вызываемого шаблона в неименованном первом параметре (или же взято из названия страницы или
		table.remove(args, 1)    --в этой строчке вреда нет в любом случае), больше его обрабатывать не надо
	end
	
	local targs, content = {}, ''
	for k, v in pairs(args) do
		if type(k) == 'number' then
			targs = mw.text.split(v, '\\')
			table.insert(targs, 1, tname)
			targs._sep, targs._style = sep, style
			content = content .. opener .. tostring(expand(frame, 'пример', targs)) .. '\n'
		end
	end
	
	return string.sub(content, 1, -2)
end

return p