Module:Infobox

Module documentation[view] [edit] [history] [purge]

This module implements a metatemplate, and may be invoked by templates using its corresponding template Template:Infobox, or used directly from other modules.

Module:Infobox is a module that implements the {{Infobox}} template. Infobox templates can be made by using the template or by calling the _sidebar function from another module.

On templates, you can create an infobox by using {{Infobox}}, which calls this module's wrapper function.

On modules, you can include local infobox= require("Module:Infobox")._infobox to create an infobox.

Introspection summary for Module:Infobox
Functions provided (2) Line Function Params 17 build (title, entries, prev_link, next_link) 56 build (title, entries, prev_x, next_x, prev_y, next_y)	Lua modules required (0) Variable Module Functions used

No function descriptions were provided. The Lua code may have further information.

---

local p = {}

local function put_adjacent_x_links(title, s, prev_x, next_x)
	return s .. '<table style="width: 100%; margin: 0"><tr>'
				.. '<td style="width: 15%; text-align: left; white-space: nowrap; font-size: smaller">'
				.. (prev_x or '')
				.. '</td>'
				.. '<td style="width: 70%; padding-left: 1em; padding-right: 1em; text-align: center">'
				.. title
				.. '</td>'
				.. '<td style="width: 15%; text-align: right; white-space: nowrap; font-size: smaller">'
				.. (next_x or '')
				.. '</td>'
				.. '</tr></table>'
end

function p.build(title, entries, prev_link, next_link)
	local s = '<div style="\n' ..
		'border: 1px solid #999;\n' ..
		'margin: 0;\n' ..
		'margin-left: 1em;\n' ..
		'margin-bottom: 0.5em;\n' ..
		'padding: 0.5em;\n' ..
		'background-color: #f0f0f0;\n' ..
		'min-width: 15em;\n' ..
		'float: right;\n' ..
		'max-width: 100%;\n' ..
		'overflow: auto;\n' ..
		'">\n' ..
		'{| width="100%" style="border-collapse: collapse;"\n' ..
		'|+ style="font-weight: bold; text-align: center;" | '
	local has_adjacent = (prev_link and #prev_link > 0) or (next_link and #next_link > 0)
	if has_adjacent then
		s = put_adjacent_x_links(title, s, prev_link, next_link)
	else
		s = s .. title
	end
	s = s .. '\n'
	for i, entry in ipairs(entries) do
		if #entry > 1 then
			local caption = entry[1]
			local text = entry[2]
			s = s .. '|-\n' ..
				'| style="text-align:right; padding-right: 0.25em" | ' .. caption .. '\n' ..
				'| style="background-color: white; padding-left: 0.25em; font-weight: bold" | ' .. text .. '\n'
		elseif #entry == 1 then
			local text = entry[1]
			s = s .. '|-\n'
				.. '| colspan="2" style="text-align: center;" | ' .. text .. '\n'
		end
	end
	s = s .. '|}</div>'
	return s
end

function p.build(title, entries, prev_x, next_x, prev_y, next_y)
	
	local s = '<div style="\n' ..
		'border: 1px solid #999;\n' ..
		'margin: 0;\n' ..
		'margin-left: 1em;\n' ..
		'margin-bottom: 0.5em;\n' ..
		'padding: 0.5em;\n' ..
		'background-color: #f0f0f0;\n' ..
		'min-width: 15em;\n' ..
		'float: right;\n' ..
		'max-width: 100%;\n' ..
		'overflow: auto;\n' ..
		'">\n' ..
		'{| width="100%" style="border-collapse: collapse;"\n' ..
		'|+ style="font-weight: bold; text-align: center;" | '
	local has_adjacent_x = (prev_x and #prev_x > 0) or (next_x and #next_x > 0)
	local has_adjacent_y = (prev_y and #prev_y > 0) or (next_y and #next_y > 0)
	
	if prev_y then -- prev y
		s = s .. '<table style="width: 100%; margin: 0"><tr>'
			.. '<td></td><td style="\n' 
			.. 'width: 70%; padding-left: 1em; padding-right: 1em; text-align: center">'
			.. prev_y
			.. '\n</td><td></td>' 
			.. '\n<tr>'
			.. '<td style="width: 15%; text-align: left; white-space: nowrap; font-size: smaller">'
			.. (prev_x or '')
			.. '</td>'
			.. '<td style="width: 70%; padding-left: 1em; padding-right: 1em; text-align: center">'
			.. title
			.. '</td>'
			.. '<td style="width: 15%; text-align: right; white-space: nowrap; font-size: smaller">'
			.. (next_x or '')
			.. '</td>'
			.. '</tr>'
		if next_y then
			s = s .. '<tr>'
			.. '<td></td><td style="\n' 
			.. 'width: 70%; padding-left: 1em; padding-right: 1em; text-align: center">'
			.. next_y
			.. '\n</td><td></td>'
			.. '</tr>'
		end
	elseif has_adjacent_x then -- no prev y, has adjacent x
		s = s .. '<table style="width: 100%; margin: 0"><tr>'
			.. '<td style="width: 15%; text-align: left; white-space: nowrap; font-size: smaller">'
			.. (prev_x or '')
			.. '</td>'
			.. '<td style="width: 70%; padding-left: 1em; padding-right: 1em; text-align: center">'
			.. title
			.. '</td>'
			.. '<td style="width: 15%; text-align: right; white-space: nowrap; font-size: smaller">'
			.. (next_x or '')
			.. '</td>'
			.. '</tr>'
		if next_y then
			s = s .. '<tr><td></td>'
			.. '<td style="\n' 
			.. 'width: 15%; text-align: center; white-space: nowrap; font-size: smaller">'
			.. next_y
			.. '\n</td><td></td>'
			.. '</tr>'
		end
		s = s ..  '</table>'
	elseif next_y then -- no prev y, no adjacent x, so first row should be title in center
		s = s .. '<table style="width: 100%; margin: 0"><tr>'
			.. '<td>'
			.. '</td>'
			.. '<td>'
			.. title
			.. '</td>'
			.. '<td>'
			.. '</td>'
			.. '</tr>'
			.. '<tr><td></td>'
			.. '<td style="\n' 
			.. 'width: 15%; text-align: left; white-space: nowrap; font-size: smaller">'
			.. next_y
			.. '\n</td><td></td>'
			.. '</tr>'
			.. '</table>' 
	else
		s = s .. title
	end
	s = s .. '\n'
	for i, entry in ipairs(entries) do
		if #entry > 1 then
			local caption = entry[1]
			local text = entry[2]
			s = s .. '|-\n' ..
				'| style="text-align:right; padding-right: 0.25em" | ' .. caption .. '\n' ..
				'| style="background-color: white; padding-left: 0.25em; font-weight: bold" | ' .. text .. '\n'
		elseif #entry == 1 then
			local text = entry[1]
			s = s .. '|-\n'
				.. '| colspan="2" style="text-align: center;" | ' .. text .. '\n'
		end
	end
	s = s .. '|}</div>'
	return s
end

return p