Відмінності між версіями «Модуль:Navbox»

Модуль:Navbox (переглянути вихідний код)

Версія за 19:36, 14 жовтня 2020

21 байт вилучено ,  5 років тому
м
нема опису редагування
м
м
Рядок 1: Рядок 1:
--------------------------------------------------------------------
--<pre> Navbox Module
--
--
-- * Fully CSS styled (inline styles possible but not default)
-- This module implements {{Navbox}}
-- * Supports unlimited rows
--
--
-- By User:Tjcool007 from layton.fandom.com
 
--------------------------------------------------------------------
local p = {}
local p = {}
 
local args = {} -- Arguments passed to template
local navbar = require('Module:Navbar')._navbar
local navbox -- Actual navbox
local getArgs -- lazily initialized
 
--local working = {}
local args
local rownums, skiprows = {}, {}
local border
local hasrows, alt, hasData, isChild = false, false, false, false
local listnums
local activeSection, sections, cimage, cimageleft
local ODD_EVEN_MARKER = '\127_ODDEVEN_\127'
local colspan, rowspan
local RESTART_MARKER = '\127_ODDEVEN0_\127'
local REGEX_MARKER = '\127_ODDEVEN(%d?)_\127'
local showText, hideText = 'Show', 'Hide'
 
local function striped(wikitext)
local langCode = mw.getContentLanguage():getCode()
-- Return wikitext with markers replaced for odd/even striping.
local localization = {} --localized strings table
-- Child (subgroup) navboxes are flagged with a category that is removed
localization['en'] = {show = 'Show', hide = 'Hide'}
-- by parent navboxes. The result is that the category shows all pages
localization['ru'] = {show = 'показать', hide = 'скрыть'}
-- where a child navbox is not contained in a parent navbox.
localization['zh'] = {show = '显示', hide = '隐藏'}
local orphanCat = '[[Category:Navbox orphans]]'
if localization[langCode] then
if border == 'subgroup' and args.orphan ~= 'yes' then
    showText = localization[langCode]['show']
-- No change; striping occurs in outermost navbox.
    hideText = localization[langCode]['hide']
return wikitext .. orphanCat
end
------------------------------------------------
-- Title
------------------------------------------------
--- Processes the VDE links in the title
--
-- @param titlecell The table cell of the title
local function processVde( titlecell )
if not args.template then return end
titlecell:wikitext('<span class="navbox-vde">'
.. mw.getCurrentFrame():expandTemplate({
title = 'vdelinks',
args = { args.template, ['type'] = 'navbox' }
}) .. '</span>')
end
--- Processes the main title row
local function processTitle()
local titlerow = mw.html.create('tr'):addClass('navbox-title')
local titlecell = mw.html.create('th'):attr('colspan',colspan):attr('scope','col')
if not pcall( processVde, titlecell ) then
titlecell:wikitext( '<b class="navbox-vde error" title="Missing Template:Vdelinks">!!!</b>' )
end
end
local first, second = 'odd', 'even'
titlecell:wikitext( args.title or '{{{title}}}' )
if args.evenodd then
if args.evenodd == 'swap' then
-- Padding
first, second = second, first
local hasTemplate = args.template ~= nil
local hasState = not args.state or args.state ~= 'plain'
if hasTemplate ~= hasState then
if hasTemplate then
titlecell:addClass('navbox-title-padright')
else
else
titlecell:addClass('navbox-title-padleft')
first = args.evenodd
second = first
end
end
end
end
local changer
if args.titleclass then titlerow:addClass( args.titleclass ) end
if first == second then
if args.titlestyle then titlecell:cssText( args.titlestyle ) end
changer = first
else
titlerow:node(titlecell)
local index = 0
navbox:node(titlerow)
changer = function (code)
if code == '0' then
-- Current occurrence is for a group before a nested table.
-- Set it to first as a valid although pointless class.
-- The next occurrence will be the first row after a title
-- in a subgroup and will also be first.
index = 0
return first
end
index = index + 1
return index % 2 == 1 and first or second
end
end
local regex = orphanCat:gsub('([%[%]])', '%%%1')
return (wikitext:gsub(regex, ''):gsub(REGEX_MARKER, changer))  -- () omits gsub count
end
end
 
local function _addGutter( parent, incRowspan )
local function processItem(item, nowrapitems)
parent:tag('tr'):addClass('navbox-gutter'):tag('td'):attr('colspan',2)
if item:sub(1, 2) == '{|' then
-- Applying nowrap to lines in a table does not make sense.
if incRowspan then
-- Add newlines to compensate for trim of x in |parm=x in a template.
rowspan = rowspan + 1
return '\n' .. item ..'\n'
end
end
end
if nowrapitems == 'yes' then
local lines = {}
------------------------------------------------
for line in (item .. '\n'):gmatch('([^\n]*)\n') do
-- Above/Below
local prefix, content = line:match('^([*:;#]+)%s*(.*)')
------------------------------------------------
if prefix and not content:match('^<span class="nowrap">') then
line = prefix .. '<span class="nowrap">' .. content .. '</span>'
--- Processes the above and below rows
end
--
table.insert(lines, line)
-- @param rowtype Either 'above' or 'below'
end
local function processAboveBelow( rowtype )
item = table.concat(lines, '\n')
if not args[rowtype] then return end
local abrow = mw.html.create('tr'):addClass('navbox-'..rowtype)
local abcell = mw.html.create('td'):attr('colspan',colspan):wikitext( args[rowtype] )
if args[rowtype .. 'class'] then abrow:addClass( args[rowtype .. 'class'] ) end
if args[rowtype .. 'style'] then abcell:cssText( args[rowtype .. 'style'] ) end
abrow:node( abcell )
_addGutter( navbox )
navbox:node( abrow )
end
------------------------------------------------
-- Main Rows
------------------------------------------------
--- Processes the images
local function _processImage(row, imgtype)
if not args[imgtype] then return end
local iclass = imgtype == 'image' and 'navbox-image-right' or 'navbox-image-left'
local imagecell = mw.html.create('td'):addClass('navbox-image'):addClass(iclass)
local image = args[imgtype]
if image:sub(1,1) ~= '[' then
local width = args[imgtype .. 'width'] or '100px'
imagecell:css('width',width):wikitext('['..'[' .. image  .. '|' .. width .. '|link=' .. (args[imgtype .. 'link'] or '') .. ']]')
else
imagecell:css('width','0%'):wikitext(image)
end
end
if item:match('^[*:;#]') then
if args[imgtype .. 'class'] then imagecell:addClass( args[imgtype .. 'class'] ) end
return '\n' .. item ..'\n'
if args[imgtype .. 'style'] then imagecell:cssText( args[imgtype .. 'style'] ) end
row:node( imagecell )
if imgtype == 'image' then
cimage = imagecell
else
cimageleft = imagecell
end
end
return item
end
end
 
--- Closes the currently active section (if any)
local function renderNavBar(titleCell)
local function _closeCurrentSection()
 
if not activeSection then return end
if args.navbar ~= 'off' and args.navbar ~= 'plain' and not (not args.name and mw.getCurrentFrame():getParent():getTitle():gsub('/sandbox$', '') == 'Template:Navbox') then
titleCell:wikitext(navbar{
local row = mw.html.create('tr'):addClass('navbox-section-row')
args.name,
local cell = mw.html.create('td'):attr('colspan',2)
mini = 1,
fontstyle = (args.basestyle or '') .. ';' .. (args.titlestyle or '') .. ';background:none transparent;border:none;-moz-box-shadow:none;-webkit-box-shadow:none;box-shadow:none; padding:0;'
if not hasrows then
})
_processImage(row,'imageleft')
end
end
 
cell:node(sections[activeSection])
end
row:node(cell)
 
--
local firstRow = false
--  Title row
if not hasrows then
--
firstRow = true
local function renderTitleRow(tbl)
hasrows = true
if not args.title then return end
_processImage(row,'image')
 
local titleRow = tbl:tag('tr')
 
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
end
 
_addGutter(navbox,not firstRow)
local titleCell = titleRow:tag('th'):attr('scope', 'col')
navbox:node(row)
 
rowspan = rowspan + 1
if args.titlegroup then
titleCell
activeSection = false
:css('border-left', '2px solid #fdfdfd')
hasData = false
: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')
-- id for aria-labelledby attribute
:attr('id', mw.uri.anchorEncode(args.title))
:addClass(args.titleclass)
:css('font-size', '114%')
:css('margin', '0 4em')
:wikitext(processItem(args.title))
end
end
 
--- Handles alternating rows
--
--   Above/Below rows
--
--
-- @return Alternatingly returns true or false. Always returns false if alternating rows
 
--         are disabled with "alternaterows = no"
local function getAboveBelowColspan()
local function _alternateRow()
local ret = 2
if args.alternaterows == 'no' then return false end
if args.imageleft then ret = ret + 1 end
if alt then
if args.image then ret = ret + 1 end
alt = false
return ret
return true
end
else
 
alt = true
local function renderAboveRow(tbl)
return false
if not args.above then return end
end
 
tbl:tag('tr')
:tag('td')
:addClass('navbox-abovebelow')
:addClass(args.aboveclass)
:cssText(args.basestyle)
:cssText(args.abovestyle)
:attr('colspan', getAboveBelowColspan())
:tag('div')
-- id for aria-labelledby attribute, if no title
:attr('id', args.title and nil or mw.uri.anchorEncode(args.above))
:wikitext(processItem(args.above, args.nowrapitems))
end
 
local function renderBelowRow(tbl)
if not args.below then return end
 
tbl:tag('tr')
:tag('td')
:addClass('navbox-abovebelow')
:addClass(args.belowclass)
:cssText(args.basestyle)
:cssText(args.belowstyle)
:attr('colspan', getAboveBelowColspan())
:tag('div')
:wikitext(processItem(args.below, args.nowrapitems))
end
end
 
--- Process a single Header "row"
--
--   List rows
--
--
-- @param num Number of the row to be processed
local function renderListRow(tbl, index, listnum)
local function processHeader(num)
local row = tbl:tag('tr')
if not args['header'..num] then return end
 
if index == 1 and args.imageleft then
_closeCurrentSection()
row
:tag('td')
local subtable = mw.html.create('table'):addClass('navbox-section')
:addClass('noviewer')
local headerrow = mw.html.create('tr')
:addClass('navbox-image')
local header = mw.html.create('th'):addClass('navbox-header'):attr('colspan',2):attr('scope','col'):wikitext( args['header'..num] )
:addClass(args.imageclass)
:css('width', '1px')               -- Minimize width
local collapseme = args['state'..num] or false
:css('padding', '0px 2px 0px 0px')
local state = false
:cssText(args.imageleftstyle)
:attr('rowspan', #listnums)
if collapseme then
:tag('div')
-- Look at this one
:wikitext(processItem(args.imageleft))
if collapseme ~= 'plain' then
end
state = collapseme == 'expanded' and 'expanded' or 'collapsed'
 
if args['group' .. listnum] then
local groupCell = row:tag('th')
 
-- id for aria-labelledby attribute, if lone group with no title or above
if listnum == 1 and not (args.title or args.above or args.group2) then
groupCell
:attr('id', mw.uri.anchorEncode(args.group1))
end
end
groupCell
:attr('scope', 'row')
:addClass('navbox-group')
:addClass(args.groupclass)
:cssText(args.basestyle)
:css('width', args.groupwidth or '1%') -- If groupwidth not specified, minimize width
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
else
-- Look at default
listCell:attr('colspan', 2)
local collapseall = args.defaultstate or false
if collapseall then
state = collapseall == 'expanded' and 'expanded' or 'collapsed'
end
end
if state then
subtable:addClass('mw-collapsible'):attr('data-expandtext',args['expandtext'..num] or args['defaultexpandtext'] or showText):attr('data-collapsetext',args['collapsetext'..num] or args['defaultcollapsetext'] or hideText)
if state == 'collapsed' then
subtable:addClass('mw-collapsed')
end
header:addClass('navbox-header-collapsible')
end
end
 
if args.headerclass then headerrow:addClass( args.headerclass ) end
if not args.groupwidth then
if args.headerstyle then header:cssText( args.headerstyle ) end
listCell:css('width', '100%')
headerrow:node(header)
subtable:node(headerrow)
sections[num] = subtable
activeSection = num
end
--- Processes a single list row
--
-- @param num Number of the row to be processed
local function processList(num)
if not args['list'..num] then return end
local row = mw.html.create('tr'):addClass('navbox-row')
if not hasrows and not activeSection then
_processImage(row, 'imageleft')
end
end
 
local listcell = mw.html.create('td'):addClass('navbox-list')
local rowstyle  -- usually nil so cssText(rowstyle) usually adds nothing
local hlistcell = listcell:tag('div'):addClass('hlist')
if index % 2 == 1 then
rowstyle = args.oddstyle
local data = args['list'..num]
if data:sub(1,1) == '*' then
-- Add newlines to support lists properly
hlistcell
:newline()
:wikitext( data )
:newline()
else
else
hlistcell:wikitext( data )
rowstyle = args.evenstyle
end
end
 
local altRow = _alternateRow()
local listText = args['list' .. listnum]
if altRow then
local oddEven = ODD_EVEN_MARKER
row:addClass( args.altrowclass or 'alt' )
if listText:sub(1, 12) == '</div><table' then
-- Assume list text is for a subgroup navbox so no automatic striping for this row.
local listclass = args.altlistclass or args.listclass or false
oddEven = listText:find('<th[^>]*"navbox%-title"') and RESTART_MARKER or 'odd'
if listclass then listcell:addClass( listclass ) end
local liststyle = args.altliststyle or args.liststyle or false
if liststyle then listcell:cssText( liststyle ) end
else
if args.rowclass then row:addClass( args.rowclass ) end
if args.listclass then listcell:addClass( args.listclass ) end
if args.liststyle then listcell:cssText( args.liststyle ) end
end
end
listCell
if args['group'..num] then
:css('padding', '0px')
local groupcell = mw.html.create('th'):addClass('navbox-group'):attr('scope','row'):wikitext( args['group'..num] )
:cssText(args.liststyle)
:cssText(rowstyle)
if altRow then
:cssText(args['list' .. listnum .. 'style'])
local groupclass = args.altgroupclass or args.groupclass or false
:addClass('navbox-list')
if groupclass then groupcell:addClass( groupclass ) end
:addClass('navbox-' .. oddEven)
:addClass(args.listclass)
local groupstyle = args.altgroupstyle or args.groupstyle or false
:addClass(args['list' .. listnum .. 'class'])
if groupstyle then groupcell:cssText( groupstyle ) end
:tag('div')
else
:css('padding', (index == 1 and args.list1padding) or args.listpadding or '0em 0.25em')
if args.groupclass then groupcell:addClass( args.groupclass ) end
:wikitext(processItem(listText, args.nowrapitems))
if args.groupstyle then groupcell:cssText( args.groupstyle ) end
 
end
if index == 1 and args.image then
row
row:node( groupcell )
:tag('td')
else
:addClass('noviewer')
listcell:attr('colspan',2):addClass('no-group')
:addClass('navbox-image')
:addClass(args.imageclass)
:css('width', '1px')              -- Minimize width
:css('padding', '0px 0px 0px 2px')
:cssText(args.imagestyle)
:attr('rowspan', #listnums)
:tag('div')
:wikitext(processItem(args.image))
end
end
end
row:node( listcell )
 
 
local firstRow = false
--
if not hasrows and not activeSection then
--  Tracking categories
firstRow = true
--
hasrows = true
 
_processImage(row, 'image')
local function needsHorizontalLists()
if border == 'subgroup' or args.tracking == 'no' then
return false
end
end
local listClasses = {
if activeSection then
['plainlist'] = true, ['hlist'] = true, ['hlist hnum'] = true,
local parent = sections[activeSection]
['hlist hwrap'] = true, ['hlist vcard'] = true, ['vcard hlist'] = true,
if not isChild or not firstRow then
['hlist vevent'] = true,
_addGutter(parent)
}
return not (listClasses[args.listclass] or listClasses[args.bodyclass])
end
 
local function hasBackgroundColors()
for _, key in ipairs({'titlestyle', 'groupstyle', 'basestyle', 'abovestyle', 'belowstyle'}) do
if tostring(args[key]):find('background', 1, true) then
return true
end
end
parent:node(row)
end
hasData = true
end
else
 
if not isChild or not firstRow then
local function hasBorders()
_addGutter(navbox,not firstRow)
for _, key in ipairs({'groupstyle', 'basestyle', 'abovestyle', 'belowstyle'}) do
if tostring(args[key]):find('border', 1, true) then
return true
end
end
navbox:node( row )
rowspan = rowspan + 1
end
end
end
end
 
--- Processes all rows
local function isIllegible()
local function processRows()
local styleratio = require('Module:Color contrast')._styleratio
sections = {}
 
for i=1,#rownums do
for key, style in pairs(args) do
local num = rownums[i]
if tostring(key):match("style$") then
if not skiprows[num] then
if styleratio{mw.text.unstripNoWiki(style)} < 4.5 then
processHeader(num)
return true
processList(num)
end
end
end
end
end
_closeCurrentSection()
return false
end
if cimageleft then
 
cimageleft:attr('rowspan',rowspan)
local function getTrackingCategories()
end
local cats = {}
if cimage then
if needsHorizontalLists() then table.insert(cats, 'Navigational boxes without horizontal lists') end
cimage:attr('rowspan',rowspan)
if hasBackgroundColors() then table.insert(cats, 'Navboxes using background colours') end
if isIllegible() then table.insert(cats, 'Potentially illegible navboxes') end
if hasBorders() then table.insert(cats, 'Navboxes using borders') end
return cats
end
 
local function renderTrackingCategories(builder)
local title = mw.title.getCurrentTitle()
if title.namespace ~= 10 then return end -- not in template space
local subpage = title.subpageText
if subpage == 'doc' or subpage == 'sandbox' or subpage == 'testcases' then return end
 
for _, cat in ipairs(getTrackingCategories()) do
builder:wikitext('[[Category:' .. cat .. ']]')
end
end
end
end
 
------------------------------------------------
--
-- ARGUMENTS PREPROCESSOR
--   Main navbox tables
-- * Extracts arguments from frame and stores them in args table
-- * At the same time, checks for valid row numbers
------------------------------------------------
--- Preprocessor for the arguments.
-- Will fill up the args table with the parameters from the frame grouped by their type.
--
--
-- @param frame The frame passed to the Module.
local function renderMainTable()
local function preProcessArgs(frame)
local tbl = mw.html.create('table')
local tmp = {}
:addClass('nowraplinks')
:addClass(args.bodyclass)
if frame == mw.getCurrentFrame() then
 
tmp = frame:getParent().args
if args.title and (args.state ~= 'plain' and args.state ~= 'off') then
else
if args.state == 'collapsed' then args.state = 'mw-collapsed' end
tmp = frame
tbl
end
:addClass('mw-collapsible')
:addClass(args.state or 'autocollapse')
-- Storage tables
local nums = {}
-- Loop over all the args
for k,v in pairs(tmp) do
-- Skip empty args, which are useless
if v ~= '' then
local cat,num = tostring(k):match('^(%a+)([1-9]%d*)$')
if cat == 'header' or cat == 'list' then
nums[num] = true
end
args[k] = v -- Simple copy
end
end
end
 
colspan = args.image and 3 or 2
tbl:css('border-spacing', 0)
if args.imageleft then colspan = colspan + 1 end
if border == 'subgroup' or border == 'none' then
rowspan = 0
tbl
:addClass('navbox-subgroup')
if args.alternaterows == 'swap' then
:cssText(args.bodystyle)
alt = true
:cssText(args.style)
else  -- regular navbox - bodystyle and style will be applied to the wrapper table
tbl
:addClass('navbox-inner')
:css('background', 'transparent')
:css('color', 'inherit')
end
end
tbl:cssText(args.innerstyle)
for k, v in pairs(nums) do
 
rownums[#rownums+1] = tonumber(k)
renderTitleRow(tbl)
renderAboveRow(tbl)
for i, listnum in ipairs(listnums) do
renderListRow(tbl, i, listnum)
end
end
renderBelowRow(tbl)
table.sort(rownums)
 
return tbl
-- Calculate skip rows
end
local cSection, cSkip
 
local showall = args.showall
function p._navbox(navboxArgs)
for i=1,#rownums do
args = navboxArgs
local num = rownums[i]
listnums = {}
if args['header'..num] then
 
cSection = true
for k, _ in pairs(args) do
cSkip = false
if type(k) == 'string' then
local showme = args['show'..num]
local listnum = k:match('^list(%d+)$')
if showme == 'no' then
if listnum then table.insert(listnums, tonumber(listnum)) end
cSkip = true
elseif showme == 'auto' or (showme ~= 'yes' and showall ~= 'yes') then
if not args['list'..num] then
local nextNum = rownums[i+1]
cSkip = not nextNum or args['header'..nextNum] -- If next has a header -> skip
end
end
end
if cSection and cSkip then
skiprows[num] = true
end
end
end
end
end
table.sort(listnums)
 
------------------------------------------------
border = mw.text.trim(args.border or args[1] or '')
-- MAIN FUNCTIONS
if border == 'child' then
------------------------------------------------
border = 'subgroup'
--- Processes the arguments to create the navbox.
--
-- @return A string with HTML that is the navbox.
local function _navbox()
-- Create the root HTML element
local trim = function(s)
return s and mw.ustring.gsub(s, "^%s*(.-)%s*$", "%1") or ''
end
end
local border = args.border or trim(args[1]) or ''
 
isChild = (border == 'child' or border == 'subgroup')
-- render the main body of the navbox
local tbl = renderMainTable()
if isChild then
 
navbox = mw.html.create('table'):addClass('navbox-subgroup')
-- render the appropriate wrapper around the navbox, depending on the border param
local res = mw.html.create()
if border == 'none' then
local nav = res:tag('div')
:attr('role', 'navigation')
:node(tbl)
-- aria-labelledby title, otherwise above, otherwise lone group
if args.title or args.above or (args.group1 and not args.group2) then
nav:attr('aria-labelledby', mw.uri.anchorEncode(args.title or args.above or args.group1))
else
nav:attr('aria-label', 'Navbox')
end
elseif border == 'subgroup' then
-- We assume that this navbox is being rendered in a list cell of a parent navbox, and is
-- therefore inside a div with padding:0em 0.25em. We start with a </div> to avoid the
-- padding being applied, and at the end add a <div> to balance out the parent's </div>
res
:wikitext('</div>')
:node(tbl)
:wikitext('<div>')
else
else
navbox = mw.html.create('table'):addClass('navbox')
local nav = res:tag('div')
:attr('role', 'navigation')
if args.state ~= 'plain' then
:addClass('navbox')
navbox:addClass('mw-collapsible'):attr('data-expandtext',args['expandtext'] or args['defaultexpandtext'] or showText):attr('data-collapsetext',args['collapsetext'] or args['defaultcollapsetext'] or hideText)
:addClass(args.navboxclass)
if args.state == 'collapsed' then
:cssText(args.bodystyle)
navbox:addClass('mw-collapsed')
:cssText(args.style)
end
:css('padding', '3px')
:node(tbl)
-- aria-labelledby title, otherwise above, otherwise lone group
if args.title or args.above or (args.group1 and not args.group2) then
nav:attr('aria-labelledby', mw.uri.anchorEncode(args.title or args.above or args.group1))
else
nav:attr('aria-label', 'Navbox')
end
end
end
end
 
if args.bodyclass then navbox:addClass(args.bodyclass) end
if (args.nocat or 'false'):lower() == 'false' then
if args.bodystyle then navbox:cssText(args.bodystyle) end
renderTrackingCategories(res)
-- Process...
if not isChild then
processTitle()
processAboveBelow('above')
processRows()
processAboveBelow('below')
return tostring(navbox)
else
processRows()
local wrapper = mw.html.create('')
wrapper:wikitext('</div>')
wrapper:node(navbox)
wrapper:wikitext('<div class="hlist">')
return tostring(wrapper)
end
end
return striped(tostring(res))
end
end
 
--- Main module entry point.
function p.navbox(frame)
-- To be called with {{#invoke:navbox|main}} or directly from another module.
if not getArgs then
--
getArgs = require('Module:Arguments').getArgs
-- @param frame The frame passed to the module via the #invoke. If called from another
end
--              module directly, this should be a table with the parameter definition.
args = getArgs(frame, {wrappers = {'Template:Navbox'}})
function p.main(frame)
 
-- Save the arguments in a local variable so other functions can use them.
-- Read the arguments in the order they'll be output in, to make references number in the right order.
preProcessArgs(frame)
local _
_ = args.title
return _navbox()
_ = args.above
for i = 1, 20 do
_ = args["group" .. tostring(i)]
_ = args["list" .. tostring(i)]
end
_ = args.below
 
return p._navbox(args)
end
end
 
return p
return p
Отримано з http://wiki.court.gov.ua/w/Спеціальна:Мобільна_різниця_версій/1374