Module:Navbox: Difference between revisions

Jump to navigation Jump to search
imported>Toohool
(rewrite with htmlbuilder)
imported>Toohool
m (whitespace)
Line 19: Line 19:
     -- If any other rows have already been added, then we add a 2px gutter row.
     -- If any other rows have already been added, then we add a 2px gutter row.
     if tableRowAdded then
     if tableRowAdded then
tbl
        tbl
.tag('tr')
            .tag('tr')
.css('height', '2px')
                .css('height', '2px')
.tag('td')
                .tag('td')
end
    end
   
tableRowAdded = true
    tableRowAdded = true
   
return tbl.tag('tr')
    return tbl.tag('tr')
end
end


Line 37: Line 37:
     if not args.title then return end
     if not args.title then return end
   
   
local titleRow = addTableRow(tbl)
    local titleRow = addTableRow(tbl)
   
     if args.titlegroup then
     if args.titlegroup then
    titleRow
        titleRow
    .tag('th')
            .tag('th')
    .attr('scope', 'row')
                .attr('scope', 'row')
    .addClass('navbox-group')
                .addClass('navbox-group')
    .addClass(args.titlegroupclass)
                .addClass(args.titlegroupclass)
    .cssText(args.basestyle)
                .cssText(args.basestyle)
    .cssText(args.groupstyle)
                .cssText(args.groupstyle)
    .cssText(args.titlegroupstyle)
                .cssText(args.titlegroupstyle)
    .wikitext(args.titlegroup)
                .wikitext(args.titlegroup)
     end
     end
      
      
     local titleCell = titleRow.tag('th').attr('scope', 'col')
     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('border-left', '2px solid #fdfdfd')
    .css('width', '100%')
            .css('width', '100%')
     end
     end
      
      
Line 65: Line 65:
      
      
     titleCell
     titleCell
    .cssText(args.basestyle)
        .cssText(args.basestyle)
    .cssText(args.titlestyle)
        .cssText(args.titlestyle)
    .addClass('navbox-title')
        .addClass('navbox-title')
    .attr('colspan', titleColspan)
        .attr('colspan', titleColspan)
   
   
renderNavBar(titleCell)
    renderNavBar(titleCell)
   
   
titleCell
    titleCell
.tag('div')
        .tag('div')
.addClass(args.titleclass)
            .addClass(args.titleclass)
.css('font-size', '110%')
            .css('font-size', '110%')
.newline()
            .newline()
.wikitext(args.title)
            .wikitext(args.title)
end
end
   
   
function renderNavBar(titleCell)
function renderNavBar(titleCell)
local addStateLinkPlaceholder = false
    local addStateLinkPlaceholder = false
     if args.navbar == 'plain' or args.navbar == 'off' or (not args.name and (border == 'subgroup' or border == 'child' or border == 'none')) then
     if args.navbar == 'plain' or args.navbar == 'off' or (not args.name and (border == 'subgroup' or border == 'child' or border == 'none')) then
         if args.navbar == 'off' then
         if args.navbar == 'off' then
        addStateLinkPlaceholder = (args.state == 'plain')
            addStateLinkPlaceholder = (args.state == 'plain')
         else
         else
        addStateLinkPlaceholder = (args.state ~= 'plain')
            addStateLinkPlaceholder = (args.state ~= 'plain')
         end
         end
     else
     else
Line 96: Line 96:
             }})
             }})
         else
         else
        titleCell
            titleCell
        .tag('span')
                .tag('span')
        .addClass('error')
                    .addClass('error')
        .css('float', 'left')
                    .css('float', 'left')
        .css('white-space', 'nowrap')
                    .css('white-space', 'nowrap')
        .wikitext('Error: No name provided')
                    .wikitext('Error: No name provided')
             addStateLinkPlaceholder = (args.state == 'plain')
             addStateLinkPlaceholder = (args.state == 'plain')
         end
         end
Line 107: Line 107:
      
      
     if addStateLinkPlaceholder then
     if addStateLinkPlaceholder then
    titleCell
        titleCell
    .tag('span')
            .tag('span')
    .css('float', 'right')
                .css('float', 'right')
    .css('width', '6em')
                .css('width', '6em')
    .wikitext(' ')
                .wikitext(' ')
     end
     end
end
end
Line 122: Line 122:
     if not args.above then return end
     if not args.above then return end
   
   
addTableRow(tbl)
    addTableRow(tbl)
.tag('td')
        .tag('td')
.addClass('navbox-abovebelow')
            .addClass('navbox-abovebelow')
.addClass(args.aboveclass)
            .addClass(args.aboveclass)
.cssText(args.basestyle)
            .cssText(args.basestyle)
.cssText(args.abovestyle)
            .cssText(args.abovestyle)
.attr('colspan', getAboveBelowColspan())
            .attr('colspan', getAboveBelowColspan())
.tag('div')
            .tag('div')
.newline()
                .newline()
.wikitext(args.above)
                .wikitext(args.above)
end
end


function renderBelowRow(tbl)
function renderBelowRow(tbl)
if not args.below then return end
    if not args.below then return end
   
addTableRow(tbl)
    addTableRow(tbl)
.tag('td')
        .tag('td')
.addClass('navbox-abovebelow')
            .addClass('navbox-abovebelow')
.addClass(args.belowclass)
            .addClass(args.belowclass)
.cssText(args.basestyle)
            .cssText(args.basestyle)
.cssText(args.belowstyle)
            .cssText(args.belowstyle)
.attr('colspan', getAboveBelowColspan())
            .attr('colspan', getAboveBelowColspan())
.tag('div')
            .tag('div')
.newline()
                .newline()
.wikitext(args.below)
                .wikitext(args.below)
end
end


Line 163: Line 163:
     if not args.list1 then return end
     if not args.list1 then return end
   
   
local row = addTableRow(tbl)
    local row = addTableRow(tbl)
   
     if args.imageleft then
     if args.imageleft then
    row
        row
    .tag('td')
            .tag('td')
    .addClass('navbox-image')
                .addClass('navbox-image')
    .addClass(args.imageclass)
                .addClass(args.imageclass)
    .css('width', '0%')
                .css('width', '0%')
    .css('padding', '0px 2px 0px 0px')
                .css('padding', '0px 2px 0px 0px')
    .cssText(args.imageleftstyle)
                .cssText(args.imageleftstyle)
    .attr('rowspan', 2 * #listnums - 1)
                .attr('rowspan', 2 * #listnums - 1)
    .tag('div')
                .tag('div')
    .newline()
                    .newline()
    .wikitext(args.imageleft)
                    .wikitext(args.imageleft)
     end
     end
   
   
     if args.group1 then
     if args.group1 then
    local groupCell = row.tag('th')
        local groupCell = row.tag('th')
   
       
    groupCell
        groupCell
  .attr('scope', 'row')
              .attr('scope', 'row')
  .addClass('navbox-group')
              .addClass('navbox-group')
  .addClass(args.groupclass)
              .addClass(args.groupclass)
  .cssText(args.basestyle)
              .cssText(args.basestyle)
 
             
  if args.groupwidth then
        if args.groupwidth then
  groupCell.css('width', args.groupwidth)
            groupCell.css('width', args.groupwidth)
  end
        end


groupCell
        groupCell
.cssText(args.groupstyle)
            .cssText(args.groupstyle)
.cssText(args.group1style)
            .cssText(args.group1style)
.wikitext(args.group1)
            .wikitext(args.group1)
     end
     end
      
      
Line 201: Line 201:
      
      
     if args.group1 then
     if args.group1 then
    listCell
        listCell
    .css('text-align', 'left')
            .css('text-align', 'left')
    .css('border-left-width', '2px')
            .css('border-left-width', '2px')
    .css('border-left-style', 'solid')
            .css('border-left-style', 'solid')
     else
     else
    listCell.attr('colspan', 2)
        listCell.attr('colspan', 2)
     end
     end
      
      
     if not args.groupwidth then  
     if not args.groupwidth then  
    listCell.css('width', '100%')
        listCell.css('width', '100%')
     end
     end


Line 217: Line 217:
      
      
     listCell
     listCell
    .css('padding', '0px')
        .css('padding', '0px')
    .cssText(args.liststyle)
        .cssText(args.liststyle)
    .cssText(args.oddstyle)
        .cssText(args.oddstyle)
    .cssText(args.list1style)
        .cssText(args.list1style)
    .addClass('navbox-list')
        .addClass('navbox-list')
    .addClass('navbox-' .. evenOdd)
        .addClass('navbox-' .. evenOdd)
    .addClass(args.listclass)
        .addClass(args.listclass)
    .tag('div')
        .tag('div')
    .css('padding', args.list1padding or args.listpadding or '0em 0.25em')
            .css('padding', args.list1padding or args.listpadding or '0em 0.25em')
    .newline()
            .newline()
    .wikitext(args.list1)
            .wikitext(args.list1)


     if args.image then
     if args.image then
    row
        row
    .tag('td')
            .tag('td')
    .addClass('navbox-image')
                .addClass('navbox-image')
    .addClass(args.imageclass)
                .addClass(args.imageclass)
    .css('width', '0%')
                .css('width', '0%')
    .css('padding', '0px 0px 0px 2px')
                .css('padding', '0px 0px 0px 2px')
    .cssText(args.imagestyle)
                .cssText(args.imagestyle)
    .attr('rowspan', 2 * #listnums - 1)
                .attr('rowspan', 2 * #listnums - 1)
    .tag('div')
                .tag('div')
    .newline()
                    .newline()
    .wikitext(args.image)
                    .wikitext(args.image)
     end
     end
end
end
   
   
function renderNthListRow(tbl, listnum)
function renderNthListRow(tbl, listnum)
local row = addTableRow(tbl)
    local row = addTableRow(tbl)
   
     if args['group' .. listnum] then
     if args['group' .. listnum] then
    local groupCell = row.tag('th')
        local groupCell = row.tag('th')
   
       
    groupCell
        groupCell
  .attr('scope', 'row')
              .attr('scope', 'row')
  .addClass('navbox-group')
              .addClass('navbox-group')
  .addClass(args.groupclass)
              .addClass(args.groupclass)
  .cssText(args.basestyle)
              .cssText(args.basestyle)
 
             
  if args.groupwidth then
        if args.groupwidth then
  groupCell.css('width', args.groupwidth)
            groupCell.css('width', args.groupwidth)
  end
        end
 
         
  groupCell
        groupCell
  .cssText(args.groupstyle)
            .cssText(args.groupstyle)
  .cssText(args['group' .. listnum .. 'style'])
            .cssText(args['group' .. listnum .. 'style'])
  .wikitext(args['group' .. listnum])
            .wikitext(args['group' .. listnum])
     end
     end
      
      
Line 269: Line 269:


     if args['group' .. listnum] then
     if args['group' .. listnum] then
    listCell
        listCell
    .css('text-align', 'left')
            .css('text-align', 'left')
    .css('border-left-width', '2px')
            .css('border-left-width', '2px')
    .css('border-left-style', 'solid')
            .css('border-left-style', 'solid')
     else
     else
    listCell.attr('colspan', 2)
        listCell.attr('colspan', 2)
     end
     end
      
      
     if not args.groupwidth then  
     if not args.groupwidth then  
    listCell.css('width', '100%')
        listCell.css('width', '100%')
     end
     end
      
      
Line 285: Line 285:
     if isOdd then rowstyle = args.oddstyle end
     if isOdd then rowstyle = args.oddstyle end
   
   
local evenOdd
    local evenOdd
if args.evenodd == 'swap' then
    if args.evenodd == 'swap' then
if isOdd then evenOdd = 'even' else evenOdd = 'odd' end
        if isOdd then evenOdd = 'even' else evenOdd = 'odd' end
else
    else
if isOdd then evenOdd = args.evenodd or 'odd' else evenOdd = args.evenodd or 'even' end
        if isOdd then evenOdd = args.evenodd or 'odd' else evenOdd = args.evenodd or 'even' end
end
    end
   
     listCell
     listCell
    .css('padding', '0px')
        .css('padding', '0px')
    .cssText(args.liststyle)
        .cssText(args.liststyle)
    .cssText(rowstyle)
        .cssText(rowstyle)
    .cssText(args['list' .. listnum .. 'style'])
        .cssText(args['list' .. listnum .. 'style'])
    .addClass('navbox-list')
        .addClass('navbox-list')
    .addClass('navbox-' .. evenOdd)
        .addClass('navbox-' .. evenOdd)
    .addClass(args.listclass)
        .addClass(args.listclass)
    .tag('div')
        .tag('div')
    .css('padding', args.listpadding or '0em 0.25em')
            .css('padding', args.listpadding or '0em 0.25em')
    .newline()
            .newline()
    .wikitext(args['list' .. listnum])
            .wikitext(args['list' .. listnum])
end
end


Line 311: Line 311:
--
--
function renderMainTable()
function renderMainTable()
local tbl = HtmlBuilder.create('table')
    local tbl = HtmlBuilder.create('table')
.attr('cellspacing', 0)
        .attr('cellspacing', 0)
.addClass('nowraplinks')
        .addClass('nowraplinks')
.addClass(args.bodyclass)
        .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('collapsible')
    .addClass(args.state or 'autocollapse')
            .addClass(args.state or 'autocollapse')
     end
     end
   
   
tbl.css('border-spacing', 0)
    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')
            .addClass('navbox-subgroup')
    .cssText(args.bodyStyle)
            .cssText(args.bodyStyle)
    .cssText(args.style)
            .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')
            .addClass('navbox-inner')
    .css('background', 'transparent')
            .css('background', 'transparent')
    .css('color', 'inherit')
            .css('color', 'inherit')
     end
     end
     tbl.cssText(args.innerstyle)
     tbl.cssText(args.innerstyle)
Line 353: Line 353:


function p._navbox(navboxArgs)
function p._navbox(navboxArgs)
args = navboxArgs
    args = navboxArgs
   
     for k, v in pairs(args) do
     for k, v in pairs(args) do
         local listnum = ('' .. k):match('^list(%d+)$')
         local listnum = ('' .. k):match('^list(%d+)$')
Line 363: Line 363:
     border = trim(args.border or args[1] or '')
     border = trim(args.border or args[1] or '')


-- render the main body of the navbox
    -- render the main body of the navbox
local tbl = renderMainTable()
    local tbl = renderMainTable()


-- 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 = HtmlBuilder.create()
    local res = HtmlBuilder.create()
     if border == 'subgroup' or border == 'child' then
     if border == 'subgroup' or border == 'child' then
         res
         res
      .tag('/div', {unclosed = true})
            .tag('/div', {unclosed = true})
      .done()
            .done()
      .node(tbl)
            .node(tbl)
      .tag('div', {unclosed = true})
            .tag('div', {unclosed = true})
     elseif border ~= 'none' then
     elseif border ~= 'none' then
    res
        res
    .tag('table')
            .tag('table')
  .attr('cellspacing', 0)
                .attr('cellspacing', 0)
    .addClass('navbox')
                .addClass('navbox')
    .css('border-spacing', 0)
                .css('border-spacing', 0)
    .cssText(args.bodystyle)
                .cssText(args.bodystyle)
    .cssText(args.style)
                .cssText(args.style)
    .tag('tr')
                .tag('tr')
    .tag('td')
                    .tag('td')
    .css('padding', '2px')
                        .css('padding', '2px')
    .node(tbl)
                        .node(tbl)
     end
     end
   
   

Revision as of 05:37, 1 March 2013

Documentation for this module may be created at Module:Navbox/doc

--
-- This module will implement {{Navbox}}
--
 
local p = {}
 
local HtmlBuilder = require('Module:Sandbox/Toohool/HtmlBuilder')

local args
local tableRowAdded = false
local border
local listnums = {}
 
function trim(s)
    return (mw.ustring.gsub(s, "^%s*(.-)%s*$", "%1"))
end
 
function addTableRow(tbl)
    -- If any other rows have already been added, then we add a 2px gutter row.
    if tableRowAdded then
        tbl
            .tag('tr')
                .css('height', '2px')
                .tag('td')
    end
    
    tableRowAdded = true
    
    return tbl.tag('tr')
end


--
--   Title row
--
function renderTitleRow(tbl)
    if not args.title then return end
 
    local titleRow = addTableRow(tbl)
     
    if args.titlegroup then
        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
    
    local titleCell = titleRow.tag('th').attr('scope', 'col')
            
    if args.titlegroup then
        titleCell
            .css('border-left', '2px solid #fdfdfd')
            .css('width', '100%')
    end
    
    local titleColspan = 2
    if args.imageleft then titleColspan = titleColspan + 1 end
    if args.image then titleColspan = titleColspan + 1 end
    if args.titlegroup then titleColspan = titleColspan - 1 end
    
    titleCell
        .cssText(args.basestyle)
        .cssText(args.titlestyle)
        .addClass('navbox-title')
        .attr('colspan', titleColspan)
 
     renderNavBar(titleCell)
 
     titleCell
         .tag('div')
             .addClass(args.titleclass)
             .css('font-size', '110%')
             .newline()
             .wikitext(args.title)
end
 
function renderNavBar(titleCell)
    local addStateLinkPlaceholder = false
    if args.navbar == 'plain' or args.navbar == 'off' or (not args.name and (border == 'subgroup' or border == 'child' or border == 'none')) then
        if args.navbar == 'off' then
            addStateLinkPlaceholder = (args.state == 'plain')
        else
            addStateLinkPlaceholder = (args.state ~= 'plain')
        end
    else
        if args.name then
            titleCell.wikitext(mw.getCurrentFrame():expandTemplate{ title = 'navbar', args = { 
                args.name, 
                mini = 1, 
                fontstyle = (args.basestyle or '') .. ';' .. (args.titlestyle or '') ..  ';background:none transparent;border:none;'
            }})
        else
            titleCell
                .tag('span')
                    .addClass('error')
                    .css('float', 'left')
                    .css('white-space', 'nowrap')
                    .wikitext('Error: No name provided')
            addStateLinkPlaceholder = (args.state == 'plain')
        end
    end
    
    if addStateLinkPlaceholder then
        titleCell
            .tag('span')
                .css('float', 'right')
                .css('width', '6em')
                .wikitext(' ')
    end
end


--
--   Above/Below rows
--
function renderAboveRow(tbl)
    if not args.above then return end
 
    addTableRow(tbl)
        .tag('td')
            .addClass('navbox-abovebelow')
            .addClass(args.aboveclass)
            .cssText(args.basestyle)
            .cssText(args.abovestyle)
            .attr('colspan', getAboveBelowColspan())
            .tag('div')
                .newline()
                .wikitext(args.above)
end

function renderBelowRow(tbl)
    if not args.below then return end
    
    addTableRow(tbl)
        .tag('td')
            .addClass('navbox-abovebelow')
            .addClass(args.belowclass)
            .cssText(args.basestyle)
            .cssText(args.belowstyle)
            .attr('colspan', getAboveBelowColspan())
            .tag('div')
                .newline()
                .wikitext(args.below)
end

function getAboveBelowColspan()
    local ret = 2
    if args.imageleft then ret = ret + 1 end
    if args.image then ret = ret + 1 end
    return ret
end
 
 
--
--   List rows
--
function renderFirstListRow(tbl)
    if not args.list1 then return end
 
    local row = addTableRow(tbl)
     
    if args.imageleft then
        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')
                    .newline()
                    .wikitext(args.imageleft)
    end
 
    if args.group1 then
        local groupCell = row.tag('th')
        
        groupCell
               .attr('scope', 'row')
               .addClass('navbox-group')
               .addClass(args.groupclass)
               .cssText(args.basestyle)
               
        if args.groupwidth then
            groupCell.css('width', args.groupwidth)
        end

        groupCell
            .cssText(args.groupstyle)
            .cssText(args.group1style)
            .wikitext(args.group1)
    end
    
    local listCell = row.tag('td')
    
    if args.group1 then
        listCell
            .css('text-align', 'left')
            .css('border-left-width', '2px')
            .css('border-left-style', 'solid')
    else
        listCell.attr('colspan', 2)
    end
    
    if not args.groupwidth then 
        listCell.css('width', '100%')
    end

    local evenOdd = args.evenodd or 'odd'
    if args.evenodd == 'swap' then evenOdd = 'even' end
    
    listCell
        .css('padding', '0px')
        .cssText(args.liststyle)
        .cssText(args.oddstyle)
        .cssText(args.list1style)
        .addClass('navbox-list')
        .addClass('navbox-' .. evenOdd)
        .addClass(args.listclass)
        .tag('div')
            .css('padding', args.list1padding or args.listpadding or '0em 0.25em')
            .newline()
            .wikitext(args.list1)

    if args.image then
        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')
                    .newline()
                    .wikitext(args.image)
    end
end
 
function renderNthListRow(tbl, listnum)
    local row = addTableRow(tbl)
    
    if args['group' .. listnum] then
        local groupCell = row.tag('th')
        
        groupCell
               .attr('scope', 'row')
               .addClass('navbox-group')
               .addClass(args.groupclass)
               .cssText(args.basestyle)
               
        if args.groupwidth then
            groupCell.css('width', args.groupwidth)
        end
           
        groupCell
            .cssText(args.groupstyle)
            .cssText(args['group' .. listnum .. 'style'])
            .wikitext(args['group' .. listnum])
    end
    
    local listCell = row.tag('td')

    if args['group' .. listnum] then
        listCell
            .css('text-align', 'left')
            .css('border-left-width', '2px')
            .css('border-left-style', 'solid')
    else
        listCell.attr('colspan', 2)
    end
    
    if not args.groupwidth then 
        listCell.css('width', '100%')
    end
    
    local isOdd = (listnum % 2) == 1
    local rowstyle = args.evenstyle
    if isOdd then rowstyle = args.oddstyle end
 
    local evenOdd
    if args.evenodd == 'swap' then
        if isOdd then evenOdd = 'even' else evenOdd = 'odd' end
    else
        if isOdd then evenOdd = args.evenodd or 'odd' else evenOdd = args.evenodd or 'even' end
    end
    
    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', args.listpadding or '0em 0.25em')
            .newline()
            .wikitext(args['list' .. listnum])
end


--
--   Main navbox tables
--
function renderMainTable()
    local tbl = HtmlBuilder.create('table')
        .attr('cellspacing', 0)
        .addClass('nowraplinks')
        .addClass(args.bodyclass)
             
    if args.title and (args.state ~= 'plain' and args.state ~= 'off') then
        tbl
            .addClass('collapsible')
            .addClass(args.state or 'autocollapse')
    end
 
    tbl.css('border-spacing', 0)
    if border == 'subgroup' or border == 'child' or border == 'none' then
        tbl
            .addClass('navbox-subgroup')
            .cssText(args.bodyStyle)
            .cssText(args.style)
    else -- regular navobx - bodyStyle and style will be applied to the wrapper table
        tbl
            .addClass('navbox-inner')
            .css('background', 'transparent')
            .css('color', 'inherit')
    end
    tbl.cssText(args.innerstyle)
 
    renderTitleRow(tbl)
    renderAboveRow(tbl)
    renderFirstListRow(tbl)
 
    -- render lists 2 through N
    for i, listnum in ipairs(listnums) do
        if listnum > 1 then
            renderNthListRow(tbl, listnum) 
        end
    end
 
    renderBelowRow(tbl)
    
    return tbl
end

function p._navbox(navboxArgs)
    args = navboxArgs
    
    for k, v in pairs(args) do
        local listnum = ('' .. k):match('^list(%d+)$')
        if listnum then table.insert(listnums, tonumber(listnum)) end
    end
    table.sort(listnums)
 
    border = trim(args.border or args[1] or '')

    -- render the main body of the navbox
    local tbl = renderMainTable()

    -- render the appropriate wrapper around the navbox, depending on the border param
    local res = HtmlBuilder.create()
    if border == 'subgroup' or border == 'child' then
        res
            .tag('/div', {unclosed = true})
            .done()
            .node(tbl)
            .tag('div', {unclosed = true})
    elseif border ~= 'none' then
        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
 
    -- TODO: add tracking categories
 
    return tostring(res)
end
 
function p.navbox(frame)
    return p._navbox(frame:getParent().args)
end
 
return p