Module:Navbox: Difference between revisions
From Test Wiki
Content deleted Content added
change hasBackgroundColors to check titlestyle/groupstyle/basestyle contains the word background |
switch to mw.html per talk page (no objections) |
||
| Line 1: | Line 1: | ||
-- |
-- |
||
-- This module |
-- This module implements {{Navbox}} |
||
-- |
-- |
||
local p = {} |
local p = {} |
||
local HtmlBuilder = require('Module:HtmlBuilder') |
|||
local navbar = require('Module:Navbar')._navbar |
local navbar = require('Module:Navbar')._navbar |
||
local getArgs -- lazily initialized |
local getArgs -- lazily initialized |
||
| Line 13: | Line 12: | ||
local border |
local border |
||
local listnums = {} |
local listnums = {} |
||
local function trim(s) |
local function trim(s) |
||
return (mw.ustring.gsub(s, "^%s*(.-)%s*$", "%1")) |
return (mw.ustring.gsub(s, "^%s*(.-)%s*$", "%1")) |
||
| Line 30: | Line 29: | ||
if tableRowAdded then |
if tableRowAdded then |
||
tbl |
tbl |
||
:tag('tr') |
|||
:css('height', '2px') |
|||
:tag('td') |
|||
:attr('colspan',2) |
|||
end |
end |
||
tableRowAdded = true |
tableRowAdded = true |
||
return tbl |
return tbl:tag('tr') |
||
end |
end |
||
| Line 44: | Line 43: | ||
-- Depending on the presence of the navbar and/or show/hide link, we may need to add a spacer div on the left |
-- Depending on the presence of the navbar and/or show/hide link, we may need to add a spacer div on the left |
||
-- or right to keep the title centered. |
-- or right to keep the title centered. |
||
local spacerSide = nil |
|||
if args.navbar == 'off' then |
|||
-- No navbar, and client wants no spacer, i.e. wants the title to be shifted to the left. If there's |
-- No navbar, and client wants no spacer, i.e. wants the title to be shifted to the left. If there's |
||
-- also no show/hide link, then we need a spacer on the right to achieve the left shift. |
-- also no show/hide link, then we need a spacer on the right to achieve the left shift. |
||
| Line 58: | Line 57: | ||
if args.state == 'plain' then spacerSide = 'right' end |
if args.state == 'plain' then spacerSide = 'right' end |
||
titleCell |
titleCell:wikitext(navbar{ |
||
args.name, |
args.name, |
||
mini = 1, |
mini = 1, |
||
| Line 68: | Line 67: | ||
if spacerSide then |
if spacerSide then |
||
titleCell |
titleCell |
||
:tag('span') |
|||
:css('float', spacerSide) |
|||
:css('width', '6em') |
|||
:wikitext(' ') |
|||
end |
end |
||
end |
end |
||
| Line 82: | Line 81: | ||
local titleRow = addTableRow(tbl) |
local titleRow = addTableRow(tbl) |
||
if args.titlegroup then |
if args.titlegroup then |
||
titleRow |
titleRow |
||
:tag('th') |
|||
:attr('scope', 'row') |
|||
:addClass('navbox-group') |
|||
:addClass(args.titlegroupclass) |
|||
:cssText(args.basestyle) |
|||
:cssText(args.groupstyle) |
|||
:cssText(args.titlegroupstyle) |
|||
:wikitext(args.titlegroup) |
|||
end |
end |
||
local titleCell = titleRow |
local titleCell = titleRow:tag('th'):attr('scope', 'col') |
||
if args.titlegroup then |
if args.titlegroup then |
||
titleCell |
titleCell |
||
:css('border-left', '2px solid #fdfdfd') |
|||
:css('width', '100%') |
|||
end |
end |
||
| Line 109: | Line 108: | ||
titleCell |
titleCell |
||
:cssText(args.basestyle) |
|||
:cssText(args.titlestyle) |
|||
:addClass('navbox-title') |
|||
:attr('colspan', titleColspan) |
|||
renderNavBar(titleCell) |
renderNavBar(titleCell) |
||
titleCell |
titleCell |
||
:tag('div') |
|||
:addClass(args.titleclass) |
|||
:css('font-size', '110%') |
|||
:wikitext(addNewline(args.title)) |
|||
end |
end |
||
| Line 138: | Line 137: | ||
addTableRow(tbl) |
addTableRow(tbl) |
||
:tag('td') |
|||
:addClass('navbox-abovebelow') |
|||
:addClass(args.aboveclass) |
|||
:cssText(args.basestyle) |
|||
:cssText(args.abovestyle) |
|||
:attr('colspan', getAboveBelowColspan()) |
|||
:tag('div') |
|||
:wikitext(addNewline(args.above)) |
|||
end |
end |
||
| Line 152: | Line 151: | ||
addTableRow(tbl) |
addTableRow(tbl) |
||
:tag('td') |
|||
:addClass('navbox-abovebelow') |
|||
:addClass(args.belowclass) |
|||
:cssText(args.basestyle) |
|||
:cssText(args.belowstyle) |
|||
:attr('colspan', getAboveBelowColspan()) |
|||
:tag('div') |
|||
:wikitext(addNewline(args.below)) |
|||
end |
end |
||
| Line 170: | Line 169: | ||
if listnum == 1 and args.imageleft then |
if listnum == 1 and args.imageleft then |
||
row |
row |
||
:tag('td') |
|||
:addClass('navbox-image') |
|||
:addClass(args.imageclass) |
|||
:css('width', '0%') |
|||
:css('padding', '0px 2px 0px 0px') |
|||
:cssText(args.imageleftstyle) |
|||
:attr('rowspan', 2 * #listnums - 1) |
|||
:tag('div') |
|||
:wikitext(addNewline(args.imageleft)) |
|||
end |
end |
||
if args['group' .. listnum] then |
|||
local groupCell = row |
local groupCell = row:tag('th') |
||
groupCell |
|||
:attr('scope', 'row') |
|||
:addClass('navbox-group') |
|||
:addClass(args.groupclass) |
|||
:cssText(args.basestyle) |
|||
if args.groupwidth then |
if args.groupwidth then |
||
groupCell |
groupCell:css('width', args.groupwidth) |
||
end |
end |
||
groupCell |
|||
:cssText(args.groupstyle) |
|||
:cssText(args['group' .. listnum .. 'style']) |
|||
:wikitext(args['group' .. listnum]) |
|||
end |
end |
||
local listCell = row |
local listCell = row:tag('td') |
||
if args['group' .. listnum] then |
|||
listCell |
listCell |
||
:css('text-align', 'left') |
|||
:css('border-left-width', '2px') |
|||
:css('border-left-style', 'solid') |
|||
else |
else |
||
listCell |
listCell:attr('colspan', 2) |
||
end |
end |
||
if not args.groupwidth then |
if not args.groupwidth then |
||
listCell |
listCell:css('width', '100%') |
||
end |
end |
||
| Line 227: | Line 226: | ||
listCell |
listCell |
||
:css('padding', '0px') |
|||
:cssText(args.liststyle) |
|||
:cssText(rowstyle) |
|||
:cssText(args['list' .. listnum .. 'style']) |
|||
:addClass('navbox-list') |
|||
:addClass('navbox-' .. evenOdd) |
|||
:addClass(args.listclass) |
|||
:tag('div') |
|||
:css('padding', (listnum == 1 and args.list1padding) or args.listpadding or '0em 0.25em') |
|||
:wikitext(addNewline(args['list' .. listnum])) |
|||
if listnum == 1 and args.image then |
if listnum == 1 and args.image then |
||
row |
row |
||
:tag('td') |
|||
:addClass('navbox-image') |
|||
:addClass(args.imageclass) |
|||
:css('width', '0%') |
|||
:css('padding', '0px 0px 0px 2px') |
|||
:cssText(args.imagestyle) |
|||
:attr('rowspan', 2 * #listnums - 1) |
|||
:tag('div') |
|||
:wikitext(addNewline(args.image)) |
|||
end |
end |
||
end |
end |
||
| Line 258: | Line 257: | ||
local function needsHorizontalLists() |
local function needsHorizontalLists() |
||
if border == 'child' or border == 'subgroup' or args.tracking == 'no' then return false end |
|||
local listClasses = {'plainlist', 'hlist', 'hlist hnum', 'hlist hwrap', 'hlist vcard', 'vcard hlist', 'hlist vevent'} |
local listClasses = {'plainlist', 'hlist', 'hlist hnum', 'hlist hwrap', 'hlist vcard', 'vcard hlist', 'hlist vevent'} |
||
| Line 288: | Line 287: | ||
for i, cat in ipairs(getTrackingCategories()) do |
for i, cat in ipairs(getTrackingCategories()) do |
||
builder |
builder:wikitext('[[Category:' .. cat .. ']]') |
||
end |
end |
||
end |
end |
||
| Line 296: | Line 295: | ||
-- |
-- |
||
local function renderMainTable() |
local function renderMainTable() |
||
local tbl = |
local tbl = mw.html.create('table') |
||
:attr('cellspacing', 0) |
|||
:addClass('nowraplinks') |
|||
:addClass(args.bodyclass) |
|||
if args.title and (args.state ~= 'plain' and args.state ~= 'off') then |
if args.title and (args.state ~= 'plain' and args.state ~= 'off') then |
||
tbl |
tbl |
||
:addClass('collapsible') |
|||
:addClass(args.state or 'autocollapse') |
|||
end |
end |
||
tbl |
tbl:css('border-spacing', 0) |
||
if border == 'subgroup' or border == 'child' or border == 'none' then |
if border == 'subgroup' or border == 'child' or border == 'none' then |
||
tbl |
tbl |
||
:addClass('navbox-subgroup') |
|||
:cssText(args.bodystyle) |
|||
:cssText(args.style) |
|||
else -- regular navobx - bodystyle and style will be applied to the wrapper table |
else -- regular navobx - bodystyle and style will be applied to the wrapper table |
||
tbl |
tbl |
||
:addClass('navbox-inner') |
|||
:css('background', 'transparent') |
|||
:css('color', 'inherit') |
|||
end |
end |
||
tbl |
tbl:cssText(args.innerstyle) |
||
renderTitleRow(tbl) |
renderTitleRow(tbl) |
||
| Line 346: | Line 345: | ||
-- render the appropriate wrapper around the navbox, depending on the border param |
-- render the appropriate wrapper around the navbox, depending on the border param |
||
local res = |
local res = mw.html.create() |
||
if border == 'none' then |
if border == 'none' then |
||
res |
res:node(tbl) |
||
elseif border == 'subgroup' or border == 'child' then |
elseif border == 'subgroup' or border == 'child' then |
||
-- We assume that this navbox is being rendered in a list cell of a parent navbox, and is |
-- We assume that this navbox is being rendered in a list cell of a parent navbox, and is |
||
| Line 354: | Line 353: | ||
-- padding being applied, and at the end add a <div> to balance out the parent's </div> |
-- padding being applied, and at the end add a <div> to balance out the parent's </div> |
||
res |
res |
||
:wikitext('</div>') -- XXX: hack due to lack of unclosed support in mw.html. |
|||
:node(tbl) |
|||
:wikitext('<div>') -- XXX: hack due to lack of unclosed support in mw.html. |
|||
.node(tbl) |
|||
.tag('div', {unclosed = true}) |
|||
else |
else |
||
res |
res |
||
:tag('table') |
|||
:attr('cellspacing', 0) |
|||
:addClass('navbox') |
|||
:css('border-spacing', 0) |
|||
:cssText(args.bodystyle) |
|||
:cssText(args.style) |
|||
:tag('tr') |
|||
:tag('td') |
|||
:css('padding', '2px') |
|||
:node(tbl) |
|||
end |
end |
||
