Module:Navbox - Revision history

Gary: Match shared navboxes to Main Page orange accent; preserve category lists, nesting, caller styles and layout

2026-10-06T22:36:20Z

Match shared navboxes to Main Page orange accent; preserve category lists, nesting, caller styles and layout

← Older revision		Revision as of 22:36, 6 October 2026
Line 42:		Line 42:
	local image = getArg(args, "image")		local image = getArg(args, "image")
	local imageleft = getArg(args, "imageleft")		local imageleft = getArg(args, "imageleft")
	local bodyStyle = getArg(args, "bodystyle")		local bodyStyle = "--background:#f8fbff;--background-soft:#f8fbff;--background-soft-border:#e2aa4e;--background-hard:#fff5e5;--foreground-soft:#14364b;--tower-ink:#14364b;--tower-muted:#10304b;--navbox-level1:#ffe0a3;--navbox-level2:#fff0d3;" .. (getArg(args, "bodystyle") or "")
	local titleStyle = getArg(args, "titlestyle")		local titleStyle = "background:#ffb12b;color:#14364b;--link:#14364b;--link-hover:#14364b;--link-visited:#14364b;" .. (getArg(args, "titlestyle") or "")
	local titleClass = getArg(args, "titleclass")		local titleClass = getArg(args, "titleclass")
	local groupStyle = getArg(args, "groupstyle")		local groupStyle = (border == "subgroup" and "background:#fff0d3;color:#14364b;" or "background:#ffe0a3;color:#14364b;") .. (getArg(args, "groupstyle") or "")
	local listStyle = getArg(args, "liststyle")		local listStyle = getArg(args, "liststyle")
	local oddStyle = getArg(args, "oddstyle")		local oddStyle = getArg(args, "oddstyle")

Gary: Allow navboxes to style their inner container

2026-09-24T20:26:22Z

Allow navboxes to style their inner container

← Older revision		Revision as of 20:26, 24 September 2026
Line 78:		Line 78:
	end		end

			local innerStyle = getArg(args, "innerstyle")
	local inner = mw.html.create("div"):addClass("navbox-inner")		local inner = mw.html.create("div"):addClass("navbox-inner")
			applyStyle(inner, innerStyle)
	local rowNumber = 0		local rowNumber = 0
	for i = 1, 100 do		for i = 1, 100 do

Gary: Mark nested navboxes as subgroups

2026-09-24T20:16:54Z

Mark nested navboxes as subgroups

← Older revision		Revision as of 20:16, 24 September 2026
Line 56:		Line 56:
	:attr("aria-label", title or "Navigation")		:attr("aria-label", title or "Navigation")
	applyStyle(root, bodyStyle)		applyStyle(root, bodyStyle)
			if border == "subgroup" then
			root:addClass("navbox-subgroup")
			end

	if name then		if name then

Admin: Size and space room category icons

2026-09-07T19:04:27Z

Size and space room category icons

← Older revision		Revision as of 19:04, 7 September 2026
Line 100:		Line 100:
	applyStyle(groupCell, groupStyle)		applyStyle(groupCell, groupStyle)
	if groupIcon then		if groupIcon then
	groupCell:wikitext(frame:expandTemplate{title = "Icon", args = {groupIcon}})		groupCell:wikitext(frame:expandTemplate{title = "Icon", args = {groupIcon}} .. " " )
	end		end
	if groupLink then		if groupLink then

Admin: Render category links in navbox groups

2026-09-07T18:41:14Z

Render category links in navbox groups

← Older revision		Revision as of 18:41, 7 September 2026
Line 103:		Line 103:
	end		end
	if groupLink then		if groupLink then
	~~local href =~~ "~~/wiki/~~Category:" .. ~~string~~.~~gsub(groupLink,~~ " "~~, "_")~~		groupCell:wikitext("[[:Category:" .. groupLink .. "\|" .. group .. "]]" )
	~~local link = mw~~.~~html~~.~~create(~~"a"~~):attr("href", href):wikitext(group)~~
	~~groupCell:node(link~~)
	else		else
	groupCell:wikitext(group)		groupCell:wikitext(group)

Admin: Support linked icon categories in navboxes

2026-09-07T18:39:53Z

Support linked icon categories in navboxes

Show changes

Admin: Support linked icon categories in navboxes

2026-09-07T18:37:39Z

Support linked icon categories in navboxes

← Older revision		Revision as of 18:37, 7 September 2026
Line 1:		Line 1:
	~~local p = {}~~

	~~local function getArg(args, key, default)~~
	~~local value = args[key]~~
	~~if value == nil then~~
	~~return default~~
	~~end~~
	~~value = mw.text.trim(tostring(value))~~
	~~if value == "" then~~
	~~return default~~
	~~end~~
	~~return value~~
	~~end~~

	~~local function addWikitext(node, value)~~
	~~if value and value ~= "" then~~
	~~node:wikitext(value)~~
	~~end~~
	~~end~~

	~~local function applyStyle(node, style)~~
	~~if style and style ~= "" then~~
	~~node:cssText(style)~~
	~~end~~
	~~end~~

	~~local function makeCell(tag, className, value, style)~~
	~~local cell = mw.html.create(tag):addClass(className)~~
	~~applyStyle(cell, style)~~
	~~addWikitext(cell, value)~~
	~~return cell~~
	~~end~~

	~~function p.navbox(frame)~~
	~~local args = frame:getParent().args~~
	~~local state = string.lower(getArg(args, "state", "autocollapse"))~~
	~~local border = string.lower(getArg(args, "border", ""))~~
	~~local title = getArg(args, "title")~~
	~~local name = getArg(args, "name")~~
	~~local above = getArg(args, "above")~~
	~~local below = getArg(args, "below")~~
	~~local image = getArg(args, "image")~~
	~~local imageleft = getArg(args, "imageleft")~~
	~~local bodyStyle = getArg(args, "bodystyle")~~
	~~local titleStyle = getArg(args, "titlestyle")~~
	~~local titleClass = getArg(args, "titleclass")~~
	~~local groupStyle = getArg(args, "groupstyle")~~
	~~local listStyle = getArg(args, "liststyle")~~
	~~local oddStyle = getArg(args, "oddstyle")~~
	~~local evenStyle = getArg(args, "evenstyle")~~
	~~local rowClass = getArg(args, "listclass", "navbox-list")~~

	~~local root = mw.html.create("div")~~
	~~:addClass("navbox")~~
	~~:attr("role", "navigation")~~
	~~:attr("aria-label", title or "Navigation")~~
	~~applyStyle(root, bodyStyle)~~

	~~if name then~~
	~~root:attr("data-name", name)~~
	~~end~~

	~~if title then~~
	~~local titleRow = mw.html.create("div"):addClass("navbox-title")~~
	~~if titleClass then~~
	~~titleRow:addClass(titleClass)~~
	~~end~~
	~~applyStyle(titleRow, titleStyle)~~
	~~addWikitext(titleRow, title)~~
	~~root:node(titleRow)~~
	~~end~~

	~~if above then~~
	~~root:node(makeCell("div", "navbox-above", above, getArg(args, "abovestyle")))~~
	~~end~~

	~~local inner = mw.html.create("div"):addClass("navbox-inner")~~
	~~local rowNumber = 0~~
	~~for i = 1, 100 do~~
	~~local group = getArg(args, "group" .. i)~~
	~~local list = getArg(args, "list" .. i)~~
	~~local header = getArg(args, "header" .. i)~~
	~~if group or list or header then~~
	~~rowNumber = rowNumber + 1~~
	~~local row = mw.html.create("div"):addClass("navbox-row")~~
	~~if rowNumber % 2 == 1 then~~
	~~row:addClass("navbox-odd")~~
	~~applyStyle(row, oddStyle)~~
	~~else~~
	~~row:addClass("navbox-even")~~
	~~applyStyle(row, evenStyle)~~
	~~end~~
	~~if header then~~
	~~row:node(makeCell("div", "navbox-group navbox-header", header, getArg(args, "header" .. i .. "style", groupStyle)))~~
	~~elseif group then~~
	~~row:node(makeCell("div", "navbox-group", group, groupStyle))~~
	~~end~~
	~~local listCell = mw.html.create("div"):addClass(rowClass)~~
	~~applyStyle(listCell, getArg(args, "list" .. i .. "style", listStyle))~~
	~~addWikitext(listCell, list or "")~~
	~~row:node(listCell)~~
	~~inner:node(row)~~
	~~end~~
	~~end~~

	~~if image or imageleft then~~
	~~local imageRow = mw.html.create("div"):addClass("navbox-image-row")~~
	~~if imageleft then~~
	~~imageRow:node(makeCell("div", "navbox-image navbox-image-left", imageleft, getArg(args, "imageleftstyle")))~~
	~~end~~
	~~if image then~~
	~~imageRow:node(makeCell("div", "navbox-image", image, getArg(args, "imagestyle")))~~
	~~end~~
	~~inner:node(imageRow)~~
	~~end~~

	~~root:node(inner)~~

	~~if below then~~
	~~root:node(makeCell("div", "navbox-below", below, getArg(args, "belowstyle")))~~
	~~end~~

	~~return tostring(root)~~
	~~end~~

	~~return p~~

Admin: Remove collapse controls from navboxes

2026-09-07T17:42:41Z

Remove collapse controls from navboxes

← Older revision		Revision as of 17:42, 7 September 2026
Line 56:		Line 56:
	:attr("aria-label", title or "Navigation")		:attr("aria-label", title or "Navigation")
	applyStyle(root, bodyStyle)		applyStyle(root, bodyStyle)

	~~if state ~= "plain" and state ~= "off" and border ~= "subgroup" then~~
	~~root:addClass("mw-collapsible")~~
	~~if state == "collapsed" then~~
	~~root:addClass("mw-collapsed")~~
	~~elseif state == "autocollapse" then~~
	~~root:addClass("autocollapse")~~
	~~end~~
	~~end~~

	if name then		if name then

gary: Match Wikipedia autocollapse behavior

2026-09-07T08:10:54Z

Match Wikipedia autocollapse behavior

← Older revision		Revision as of 08:10, 7 September 2026
Line 59:		Line 59:
	if state ~= "plain" and state ~= "off" and border ~= "subgroup" then		if state ~= "plain" and state ~= "off" and border ~= "subgroup" then
	root:addClass("mw-collapsible")		root:addClass("mw-collapsible")
	if state == "collapsed~~" or state == "autocollapse~~" then		if state == "collapsed" then
	root:addClass("mw-collapsed")		root:addClass("mw-collapsed")
			elseif state == "autocollapse" then
			root:addClass("autocollapse")
	end		end
	end		end

gary: Add reusable Lua navbox module

2026-09-07T08:09:13Z

Add reusable Lua navbox module

New page

local p = {}

local function getArg(args, key, default)
local value = args[key]
if value == nil then
return default
end
value = mw.text.trim(tostring(value))
if value == "" then
return default
end
return value
end

local function addWikitext(node, value)
if value and value ~= "" then
node:wikitext(value)
end
end

local function applyStyle(node, style)
if style and style ~= "" then
node:cssText(style)
end
end

local function makeCell(tag, className, value, style)
local cell = mw.html.create(tag):addClass(className)
applyStyle(cell, style)
addWikitext(cell, value)
return cell
end

function p.navbox(frame)
local args = frame:getParent().args
local state = string.lower(getArg(args, "state", "autocollapse"))
local border = string.lower(getArg(args, "border", ""))
local title = getArg(args, "title")
local name = getArg(args, "name")
local above = getArg(args, "above")
local below = getArg(args, "below")
local image = getArg(args, "image")
local imageleft = getArg(args, "imageleft")
local bodyStyle = getArg(args, "bodystyle")
local titleStyle = getArg(args, "titlestyle")
local titleClass = getArg(args, "titleclass")
local groupStyle = getArg(args, "groupstyle")
local listStyle = getArg(args, "liststyle")
local oddStyle = getArg(args, "oddstyle")
local evenStyle = getArg(args, "evenstyle")
local rowClass = getArg(args, "listclass", "navbox-list")

local root = mw.html.create("div")
:addClass("navbox")
:attr("role", "navigation")
:attr("aria-label", title or "Navigation")
applyStyle(root, bodyStyle)

if state ~= "plain" and state ~= "off" and border ~= "subgroup" then
root:addClass("mw-collapsible")
if state == "collapsed" or state == "autocollapse" then
root:addClass("mw-collapsed")
end
end

if name then
root:attr("data-name", name)
end

if title then
local titleRow = mw.html.create("div"):addClass("navbox-title")
if titleClass then
titleRow:addClass(titleClass)
end
applyStyle(titleRow, titleStyle)
addWikitext(titleRow, title)
root:node(titleRow)
end

if above then
root:node(makeCell("div", "navbox-above", above, getArg(args, "abovestyle")))
end

local inner = mw.html.create("div"):addClass("navbox-inner")
local rowNumber = 0
for i = 1, 100 do
local group = getArg(args, "group" .. i)
local list = getArg(args, "list" .. i)
local header = getArg(args, "header" .. i)
if group or list or header then
rowNumber = rowNumber + 1
local row = mw.html.create("div"):addClass("navbox-row")
if rowNumber % 2 == 1 then
row:addClass("navbox-odd")
applyStyle(row, oddStyle)
else
row:addClass("navbox-even")
applyStyle(row, evenStyle)
end
if header then
row:node(makeCell("div", "navbox-group navbox-header", header, getArg(args, "header" .. i .. "style", groupStyle)))
elseif group then
row:node(makeCell("div", "navbox-group", group, groupStyle))
end
local listCell = mw.html.create("div"):addClass(rowClass)
applyStyle(listCell, getArg(args, "list" .. i .. "style", listStyle))
addWikitext(listCell, list or "")
row:node(listCell)
inner:node(row)
end
end

if image or imageleft then
local imageRow = mw.html.create("div"):addClass("navbox-image-row")
if imageleft then
imageRow:node(makeCell("div", "navbox-image navbox-image-left", imageleft, getArg(args, "imageleftstyle")))
end
if image then
imageRow:node(makeCell("div", "navbox-image", image, getArg(args, "imagestyle")))
end
inner:node(imageRow)
end

root:node(inner)

if below then
root:node(makeCell("div", "navbox-below", below, getArg(args, "belowstyle")))
end

return tostring(root)
end

return p