Module:Navbox: Difference between revisions
switch to mw.html per talk page (no objections)
m>WOSlinker (change hasBackgroundColors to check titlestyle/groupstyle/basestyle contains the word background) |
m>Frietjes (switch to mw.html per talk page (no objections)) |
||
| Line 1: | Line 1: | ||
-- | -- | ||
-- This module | -- This module implements {{Navbox}} | ||
-- | -- | ||
local p = {} | local p = {} | ||
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. | |||
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 | ||