Módulo:Navboxes

-- This implements Template:navboxes
local p = {}

local Navbox = require('Módulo:Navbox')

local function isnotempty(s)
	return s and s:match( '^%s*(.-)%s*$' ) ~= ''
end

local function navboxes(args, list)
	local navbar = (args['state'] and (args['state'] == 'off' or args['state'] == 'desligado' or args['state'] == 'desligada' or args['state'] == 'desligar') or args['estado'] and (args['estado'] == 'off' or args['estado'] == 'desligado' or args['estado'] == 'desligada' or args['estado'] == 'desligar')) and 'off' or 'plain'
	local title = args['title'] or args['título'] or 'Links para artigos relacionados'
	local titlestyle = 'background:' .. (args['bg'] or args['fundo'] or '#e8e8ff') .. ';'
		.. (isnotempty(args['fg'] or args['frente']) and ('color:' .. args['fg'] or args['frente'] .. ';') or '')
		.. (isnotempty(args['bordercolor'] or args['cor-borda']) and ('border: 1px solid ' .. args['bordercolor'] or args['cor-borda'] .. ';') or '')
		.. (args['titlestyle'] or args['estilo-título'] or '')
	return Navbox._navbox({
			navbar = navbar, title = title, 
			list1 = list,
			state = args['state'] or args['estado'] or 'collapsed',
			titlestyle = titlestyle,
			liststyle = 'font-size:114%',
			listpadding = '0px',
			tracking = 'no'
			})
end

function p.top(frame)		
	local args = frame:getParent().args
	local parts = mw.text.split(navboxes(args, '<ADICIONE LISTA AQUI>'), '<ADICIONE LISTA AQUI>')
	return parts[1]
end

function p.bottom(frame)		
	local args = {}
	local parts = mw.text.split(navboxes(args, '<ADICIONE LISTA AQUI>'), '<ADICIONE LISTA AQUI>')
	return parts[2]
end

function p.navbox(frame)
	local args = frame:getParent().args
	local list = args['list1'] or args['lista1'] or args['list'] or args['lista'] or ''	
	local track_cats = ''
	if list == '' then
		if mw.title.getCurrentTitle().namespace == 0 then
			track_cats = '[[Categoria:!Predefinição navboxes sem qualquer conteúdo]]'
		end
	end
	return navboxes(args, list) .. track_cats
end

return p