Модуль:Navbox: различия между версиями

Перейти к навигации Перейти к поиску

Модуль:Navbox (посмотреть исходный код)

Версия от 16:14, 30 марта 2017

1306 байт убрано ,  7 лет назад
added: Automatic striping, Категория:Навигационные шаблоны без родителя, aria-якорь; deleted: unworked mobile style
/>Jack who built the house
(учёт параметра "стиль" при выборе цвета шестерёнки)
/>Iniquity
Строка 11: Строка 11:
local tableRowAdded = false
local tableRowAdded = false
local border
local border
local listnums = {}
local ODD_EVEN_MARKER = '\127_ODDEVEN_\127'
local RESTART_MARKER = '\127_ODDEVEN0_\127'
local REGEX_MARKER = '\127_ODDEVEN(%d?)_\127'


local maintitle
local maintitle
Строка 18: Строка 22:
local image
local image
local below
local below
local titlestyle
local titlestyle
local groupstyle
local groupstyle
Строка 31: Строка 36:
local imageleftstyle
local imageleftstyle
local style
local style
local groupwidth
local groupwidth
local listpadding
local listpadding
Строка 41: Строка 47:
local listclass
local listclass
local imageclass
local imageclass
local listnums = {}


local function trim(s)
local function striped(wikitext)
    return (mw.ustring.gsub(s, "^%s*(.-)%s*$", "%1"))
-- Return wikitext with markers replaced for odd/even striping.
-- Child (subgroup) navboxes are flagged with a category that is removed
-- by parent navboxes. The result is that the category shows all pages
-- where a child navbox is not contained in a parent navbox.
local orphanCat = '[[Категория:Навигационные шаблоны без родителя]]'
if border == 'subgroup' and args.orphan ~= 'yes' then
-- No change; striping occurs in outermost navbox.
return wikitext .. orphanCat
end
local first, second = 'odd', 'even'
if args.evenodd then
if args.evenodd == 'swap' then
first, second = second, first
else
first = args.evenodd
second = first
end
end
local changer
if first == second then
changer = first
else
local index = 0
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 addNewline(s)
local function addNewline(s)
    if s:match('^[*:;#]') or s:match('^{|') then
if s:match('^[*:;#]') or s:match('^{|') then
        return '\n' .. s ..'\n'
return '\n' .. s ..'\n'
    else
else
        return s
return s
    end
end
end
end


local function addTableRow(tbl)
local function addTableRow(tbl)
    -- 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')
                    :attr('colspan',2)
:attr('colspan',2)
    end
end


    tableRowAdded = true
tableRowAdded = true


    return tbl:tag('tr')
return tbl:tag('tr')
end
end


local function renderNavBar(titleCell)
local function renderNavBar(titleCell)
    -- 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.
    local spacerSide = nil


    if navbar == 'off' then
if navbar ~= 'off' and navbar ~= 'plain' and not (not name and mw.getCurrentFrame():getParent():getTitle():gsub('/песочница$', '') == 'Шаблон:Навигационная таблица') then
        -- 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.
-- Check color contrast of the gear icon
        if args.state == 'plain' then spacerSide = 'right' end
local styleratio = require('Module:Color contrast')._styleratio
    elseif navbar == 'plain' or (not name and mw.getCurrentFrame():getParent():getTitle():gsub('/песочница$', '') == 'Шаблон:Навигационная таблица') then
local gearColor = ''
        -- No navbar. Need a spacer on the left to balance out the width of the show/hide link.
local contrastStyle = titlestyle or basestyle
        if args.state ~= 'plain' then spacerSide = 'left' end
local gearStyleBlack = (contrastStyle and mw.text.unstripNoWiki(contrastStyle) .. '; color:#666;' or '')
    else
        -- Will render navbar (or error message). If there's no show/hide link, need a spacer on the right
        -- to balance out the width of the navbar.
        if args.state == 'plain' then spacerSide = 'right' end
       
        -- Check color contrast of the gear icon
    local styleratio = require('Module:Color contrast')._styleratio
    local gearColor = ''
    local contrastStyle = titlestyle or basestyle
    local gearStyleBlack = (contrastStyle and mw.text.unstripNoWiki(contrastStyle) .. '; color:#666;' or '')
local gearStyleWhite = (contrastStyle and mw.text.unstripNoWiki(contrastStyle) .. '; color:#fff;' or '')
local gearStyleWhite = (contrastStyle and mw.text.unstripNoWiki(contrastStyle) .. '; color:#fff;' or '')
    if styleratio{gearStyleBlack} < styleratio{gearStyleWhite} then
if styleratio{gearStyleBlack} < styleratio{gearStyleWhite} then
    gearColor = ' white'
gearColor = ' white'
    end
end
       
--- Gear creation
--- Gear creation
        titleCell
titleCell
        :tag('span')
:tag('span')
        :addClass('nomobile')
:css('float', 'left')
        :css('float', 'left')
:css('text-align', 'left')
        :css('text-align', 'left')
:css('width', '5em')
        :css('width', '5em')
:css('margin-right', '0.5em')
        :css('margin-right', '0.5em')
:wikitext('[[Файл:Wikipedia interwiki section gear icon' .. gearColor .. '.svg|14px|Просмотр этого шаблона|link=Шаблон:' .. name .. '|alt=⛭]]')
        :wikitext('[[Файл:Wikipedia interwiki section gear icon' .. gearColor .. '.svg|14px|Просмотр этого шаблона|link=Шаблон:' .. name .. '|alt=⛭]]')
end
    end


    -- Render the spacer div.
    if spacerSide then
        titleCell
            :tag('span')
        :addClass('nomobile')
                :css('float', spacerSide)
                :css('width', '5em')
                :css('margin-right', '0.5em')
                :wikitext('&nbsp;')
    end
end
end


Строка 124: Строка 142:
--
--
local function renderTitleRow(tbl)
local function renderTitleRow(tbl)
    if not maintitle then return end
if not maintitle 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(basestyle)
:cssText(basestyle)
                :cssText(groupstyle)
:cssText(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


    local titleColspan = 2
local titleColspan = 2
    if imageleft then titleColspan = titleColspan + 1 end
if imageleft then titleColspan = titleColspan + 1 end
    if image then titleColspan = titleColspan + 1 end
if image then titleColspan = titleColspan + 1 end
    if args.titlegroup then titleColspan = titleColspan - 1 end
if args.titlegroup then titleColspan = titleColspan - 1 end


    titleCell
titleCell
        :cssText(basestyle)
:cssText(basestyle)
        :cssText(titlestyle)
:cssText(titlestyle)
        :addClass('navbox-title')
:addClass('navbox-title')
        :attr('colspan', titleColspan)
:attr('colspan', titleColspan)


    renderNavBar(titleCell)
renderNavBar(titleCell)


    titleCell
titleCell
        :tag('div')
:tag('div')
            :addClass(titleclass)
:attr('id', mw.uri.anchorEncode(maintitle))
            :css('font-size', '114%')
:addClass(titleclass)
            :wikitext(addNewline(maintitle))
:css('font-size', '114%')
:wikitext(addNewline(maintitle))
end
end


Строка 173: Строка 192:


local function getAboveBelowColspan()
local function getAboveBelowColspan()
    local ret = 2
local ret = 2
    if imageleft then ret = ret + 1 end
if imageleft then ret = ret + 1 end
    if image then ret = ret + 1 end
if image then ret = ret + 1 end
    return ret
return ret
end
end


local function renderAboveRow(tbl)
local function renderAboveRow(tbl)
    if not above then return end
if not above then return end


    addTableRow(tbl)
addTableRow(tbl)
        :tag('td')
:tag('td')
            :addClass('navbox-abovebelow')
:addClass('navbox-abovebelow')
            :addClass(aboveclass)
:addClass(aboveclass)
            :cssText(basestyle)
:cssText(basestyle)
            :cssText(abovestyle)
:cssText(abovestyle)
            :attr('colspan', getAboveBelowColspan())
:attr('colspan', getAboveBelowColspan())
            :tag('div')
:tag('div')
                :wikitext(addNewline(above))
:wikitext(addNewline(above))
end
end


local function renderBelowRow(tbl)
local function renderBelowRow(tbl)
    if not below then return end
if not below then return end


    addTableRow(tbl)
addTableRow(tbl)
        :tag('td')
:tag('td')
            :addClass('navbox-abovebelow')
:addClass('navbox-abovebelow')
            :addClass(belowclass)
:addClass(belowclass)
            :cssText(basestyle)
:cssText(basestyle)
            :cssText(belowstyle)
:cssText(belowstyle)
            :attr('colspan', getAboveBelowColspan())
:attr('colspan', getAboveBelowColspan())
            :tag('div')
:tag('div')
                :wikitext(addNewline(below))
:wikitext(addNewline(below))
end
end


Строка 210: Строка 229:
--  List rows
--  List rows
--
--
local function renderListRow(tbl, listnum)
local function renderListRow(tbl, index, listnum)
    local row = addTableRow(tbl)
local row = addTableRow(tbl)


    if listnum == 1 and imageleft then
if index == 1 and imageleft then
        row
row
            :tag('td')
:tag('td')
                :addClass('navbox-image')
:addClass('navbox-image')
                :addClass(imageclass)
:addClass(imageclass)
                :css('width', '1%')
:css('width', '1%')
                :css('padding', '0px 7px 0px 0px')
:css('padding', '0px 7px 0px 0px')
                :cssText(imageleftstyle)
:cssText(imageleftstyle)
                :attr('rowspan', 2 * #listnums - 1)
:attr('rowspan', 2 * #listnums - 1)
                :tag('div')
:tag('div')
                    :wikitext(addNewline(imageleft))
:wikitext(addNewline(imageleft))
    end
end


    if (args['group' .. listnum] or args['заголовок' .. listnum] or args['группа' .. listnum]) then
if (args['group' .. listnum] or args['заголовок' .. listnum] or args['группа' .. 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(groupclass)
:addClass(groupclass)
            :cssText(basestyle)
:cssText(basestyle)


-- заголовки без списков - для обратной совместимости, только в нашем разделе
-- заголовки без списков - для обратной совместимости, только в нашем разделе
Строка 242: Строка 261:
end
end


        if groupwidth then
if groupwidth then
            groupCell:css('width', groupwidth)
groupCell:css('width', groupwidth)
        end
end


        groupCell
groupCell
            :cssText(groupstyle)
:cssText(groupstyle)
            :cssText(args['group' .. listnum .. 'style'] or args['стиль_группы' .. listnum] or args['стиль_заголовка' .. listnum])
:cssText(args['group' .. listnum .. 'style'] or args['стиль_группы' .. listnum] or args['стиль_заголовка' .. listnum])
            :wikitext(args['group' .. listnum] or args['заголовок' .. listnum] or args['группа' .. listnum])
:wikitext(args['group' .. listnum] or args['заголовок' .. listnum] or args['группа' .. listnum])
    end
end


    if args['list' .. listnum] or args['список' .. listnum] then
local listCell = row:tag('td')
    local listCell = row:tag('td')
    if (args['group' .. listnum] or args['заголовок' .. listnum] or args['группа' .. listnum]) then
if (args['group' .. listnum] or args['заголовок' .. listnum] or args['группа' .. 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 groupwidth then
if not groupwidth then
        listCell:css('width', '100%')
listCell:css('width', '100%')
    end
end
    local isOdd = (listnum % 2) == 1
local rowstyle  -- usually nil so cssText(rowstyle) usually adds nothing
    local rowstyle = evenstyle
if index % 2 == 1 then
    if isOdd then rowstyle = oddstyle end
rowstyle = oddstyle
else
    local evenOdd
rowstyle = evenstyle
    if evenoddARG == 'swap' then
end
        if isOdd then evenOdd = 'even' else evenOdd = 'odd' end
    else
local listText = args['list' .. listnum] or args['список' .. listnum] or args['title' .. listnum] or args['заголовок' .. listnum]
        if isOdd then evenOdd = evenoddARG or 'odd' else evenOdd = evenoddARG or 'even' end
local oddEven = ODD_EVEN_MARKER
    end
if listText:sub(1, 12) == '</div><table' then
-- Assume list text is for a subgroup navbox so no automatic striping for this row.
    listCell
oddEven = listText:find('<th[^>]*"navbox%-title"') and RESTART_MARKER or 'odd'
        :css('padding', '0px')
end
        :cssText(liststyle)
listCell
        :cssText(rowstyle)
:css('padding', '0px')
        :cssText(args['list' .. listnum .. 'style'] or args['стиль_списка' .. listnum])
:cssText(liststyle)
        :addClass('navbox-list')
:cssText(rowstyle)
        :addClass('navbox-' .. evenOdd)
:cssText(args['list' .. listnum .. 'style'] or args['стиль_списка' .. listnum])
        :addClass(listclass)
:addClass('navbox-list')
        :tag('div')
:addClass('navbox-' .. oddEven)
            :css('padding', (listnum == 1 and args.list1padding) or listpadding or '0em 0.25em')
:addClass(listclass)
            :wikitext('\n' .. (args['list' .. listnum] or args['список' .. listnum]))
:tag('div')
:css('padding', (index == 1 and args.list1padding) or listpadding or '0em 0.25em')
:wikitext(addNewline(listText))
 
if index == 1 and args.image then
row
:tag('td')
:addClass('navbox-image')
:addClass(imageclass)
:css('width', '0%')
:css('padding', '0px 0px 0px 2px')
:cssText(args.imagestyle)
:attr('rowspan', 2 * #listnums - 1)
:tag('div')
:wikitext(addNewline(image))
end
end
    if listnum == 1 and image then
        row
            :tag('td')
                :addClass('navbox-image')
                :addClass(imageclass)
                :css('width', '1%')
                :css('padding', '0px 0px 0px 7px')
                :cssText(imagestyle)
                :attr('rowspan', 2 * #listnums - 1)
                :tag('div')
                :wikitext(addNewline(image))
    end
end
end


--
--
Строка 320: Строка 338:


local function needsHorizontalLists()
local function needsHorizontalLists()
    if border == 'child' or border == 'subgroup' or args.tracking == 'no' then return false end
if border == 'subgroup' or args.tracking == 'no' then
 
return false
    local listClasses = {'plainlist', 'hlist', 'hlist hnum', 'hlist hwrap', 'hlist vcard', 'vcard hlist', 'hlist vevent', 'hlist hlist-items-nowrap', 'hlist-items-nowrap'}
end
    for i, cls in ipairs(listClasses) do
local listClasses = {
        if listclass == cls or bodyclass == cls then
['plainlist'] = true, ['hlist'] = true, ['hlist hnum'] = true,
            return false
['hlist hwrap'] = true, ['hlist vcard'] = true, ['vcard hlist'] = true,
        end
['hlist vevent'] = true, ['hlist hlist-items-nowrap'] = true, ['hlist-items-nowrap'] = true,
    end
}
 
return not (listClasses[listclass] or listClasses[bodyclass])
    return true
end
end


-- local function hasBackgroundColors()
-- local function hasBackgroundColors()
--   return mw.ustring.match(titlestyle or '','background') or mw.ustring.match(groupstyle or '','background') or mw.ustring.match(basestyle or '','background')
-- return mw.ustring.match(titlestyle or '','background') or mw.ustring.match(groupstyle or '','background') or mw.ustring.match(basestyle or '','background')
-- end
-- end


local function isIllegible()
local function isIllegible()
    local styleratio = require('Module:Color contrast')._styleratio
local styleratio = require('Module:Color contrast')._styleratio


    for key, style in pairs(args) do
for key, style in pairs(args) do
        if tostring(key):match("style$") or tostring(key):match("^стиль") then
if tostring(key):match("style$") or tostring(key):match("^стиль") then
            if styleratio{mw.text.unstripNoWiki(style)} < 4.5 then
if styleratio{mw.text.unstripNoWiki(style)} < 4.5 then
                return true  
return true  
            end
end
        end
end
    end
end
    return false
return false
end
end


local function getTrackingCategories()
local function getTrackingCategories()
    local cats = {}
local cats = {}
    if needsChangetoSubgroups() then table.insert(cats, 'Навигационные шаблоны с ошибочным использованием заголовков') end
if needsChangetoSubgroups() then table.insert(cats, 'Навигационные шаблоны с ошибочным использованием заголовков') end
    if needsHorizontalLists() then table.insert(cats, 'Навигационные шаблоны без горизонтальных списков') end
if needsHorizontalLists() then table.insert(cats, 'Навигационные шаблоны без горизонтальных списков') end
    if isIllegible() then table.insert(cats, 'Потенциально нечитаемые навигационные шаблоны') end
if isIllegible() then table.insert(cats, 'Потенциально нечитаемые навигационные шаблоны') end
    return cats
return cats
end
end


local function renderTrackingCategories(builder)
local function renderTrackingCategories(builder)
    local title = mw.title.getCurrentTitle()
local title = mw.title.getCurrentTitle()
    if title.namespace ~= 10 then return end -- not in template space
if title.namespace ~= 10 then return end -- not in template space
    local subpage = title.subpageText
local subpage = title.subpageText
    if subpage == 'doc' or subpage == 'песочница' or subpage == 'тесты' then return end
if subpage == 'doc' or subpage == 'песочница' or subpage == 'тесты' then return end


    for i, cat in ipairs(getTrackingCategories()) do
for i, cat in ipairs(getTrackingCategories()) do
        builder:wikitext('[[Категория:' .. cat .. ']]')
builder:wikitext('[[Категория:' .. cat .. ']]')
    end
end
end
end


Строка 372: Строка 389:
--
--
local function renderMainTable()
local function renderMainTable()
    local tbl = mw.html.create('table')
local tbl = mw.html.create('table')
        :addClass('nowraplinks')
:addClass('nowraplinks')
        :addClass(bodyclass)
:addClass(bodyclass)


    if maintitle and (args.state ~= 'plain' and args.state ~= 'off') then
if maintitle 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 == 'none' then
        tbl
tbl
            :addClass('navbox-subgroup')
:addClass('navbox-subgroup')
            :cssText(bodystyle)
:cssText(bodystyle)
            :cssText(style)
:cssText(style)
    else -- regular navbox - bodystyle and style will be applied to the wrapper table
else -- regular navbox - 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)


    renderTitleRow(tbl)
renderTitleRow(tbl)
    renderAboveRow(tbl)
renderAboveRow(tbl)
    for i, listnum in ipairs(listnums) do
for i, listnum in ipairs(listnums) do
        renderListRow(tbl, listnum)
renderListRow(tbl, i, listnum)
    end
end
    renderBelowRow(tbl)
renderBelowRow(tbl)


    return tbl
return tbl
end
end


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+)$') or ('' .. k):match('^список(%d+)$')
local listnum = ('' .. k):match('^list(%d+)$') or ('' .. k):match('^список(%d+)$')
        if listnum then table.insert(listnums, tonumber(listnum)) end
if listnum then table.insert(listnums, tonumber(listnum)) end
    end
end
   
    -- заголовки без списков - для обратной совместимости, только в нашем разделе
    for k, v in pairs(args) do
    local double = false
    local groupnum = ('' .. k):match('^заголовок(%d+)$') --group не нужен, так как в английском шаблоне эта фукнциональность не поддерживается
    if groupnum then
    for k2, v2 in pairs(listnums) do
    if tonumber(groupnum) == v2 then
    double = true
    break
    end
    end
    if not double then table.insert(listnums, tonumber(groupnum)) end --добавляем только номера заголовков, для которых нет списков
    end
    end
   
    table.sort(listnums)


    border = trim(args.border or args[1] or '')
-- заголовки без списков - для обратной совместимости, только в нашем разделе
    maintitle = args.title or args['заголовок']
for k, v in pairs(args) do
    navbar = args.navbar or args['ссылка_на_просмотр']
local double = false
local groupnum = ('' .. k):match('^заголовок(%d+)$') --group не нужен, так как в английском шаблоне эта фукнциональность не поддерживается
if groupnum then
for k2, v2 in pairs(listnums) do
if tonumber(groupnum) == v2 then
double = true
break
end
end
if not double then table.insert(listnums, tonumber(groupnum)) end --добавляем только номера заголовков, для которых нет списков
end
end
table.sort(listnums)
 
border = mw.text.trim(args.border or args[1] or '')
if border == 'child' then
border = 'subgroup'
end
maintitle = args.title or args['заголовок']
navbar = args.navbar or args['ссылка_на_просмотр']
name = args.name or args['имя']
name = args.name or args['имя']
above = args.above or args['вверху']
above = args.above or args['вверху']
Строка 457: Строка 478:
bodyclass = args.bodyclass or args['класс_тела']
bodyclass = args.bodyclass or args['класс_тела']
    titleclass = args.titleclass or args['класс_заголовка']
titleclass = args.titleclass or args['класс_заголовка']
    aboveclass =args.aboveclass or args['класс_вверху']
aboveclass =args.aboveclass or args['класс_вверху']
belowclass = args.belowclass or args['класс_внизу']
belowclass = args.belowclass or args['класс_внизу']
groupclass = args.groupclass or args['класс_групп']
groupclass = args.groupclass or args['класс_групп']
Строка 464: Строка 485:
imageclass = args.imageclass or args['класс_изображения']
imageclass = args.imageclass or args['класс_изображения']
    -- 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 = mw.html.create()
local res = mw.html.create()
    if border == 'none' then
if border == 'none' then
        res:node(tbl)
local nav = res:tag('div')
    elseif border == 'subgroup' or border == 'child' then
:attr('role', 'navigation')
        -- We assume that this navbox is being rendered in a list cell of a parent navbox, and is
:node(tbl)
        -- therefore inside a div with padding:0em 0.25em. We start with a </div> to avoid the
if maintitle then
        -- padding being applied, and at the end add a <div> to balance out the parent's </div>
nav:attr('aria-labelledby', mw.uri.anchorEncode(maintitle))
        res
else
            :wikitext('</div>') -- XXX: hack due to lack of unclosed support in mw.html.
nav:attr('aria-label', 'Навигационный шаблон')
            :node(tbl)
end
            :wikitext('<div>') -- XXX: hack due to lack of unclosed support in mw.html.
elseif border == 'subgroup' then
    else
-- We assume that this navbox is being rendered in a list cell of a parent navbox, and is
        local tableTag = res:tag('table')
-- therefore inside a div with padding:0em 0.25em. We start with a </div> to avoid the
        tableTag:addClass('navbox')
-- padding being applied, and at the end add a <div> to balance out the parent's </div>
                :css('border-spacing', 0)
res
                :cssText(bodystyle)
:wikitext('</div>') -- XXX: hack due to lack of unclosed support in mw.html.
                :cssText(style)
:node(tbl)
                :tag('tr')
:wikitext('<div>') -- XXX: hack due to lack of unclosed support in mw.html.
                    :tag('td')
else
                        :css('padding', '2px')
local nav = res:tag('div')
                        :node(tbl)
:attr('role', 'navigation')
       
:addClass('navbox')
        if ( not titlestyle and not groupstyle and not bodystyle and not basestyle and not style
:cssText(bodystyle)
        and not liststyle and not oddstyle and not evenstyle and not abovestyle and not belowstyle
:cssText(style)
        and not args["group6"] and not args["group7"] and not args["group8"] and not args["group9"] ) then
:css('padding', '3px')
        tableTag:addClass( 'navbox-allow-mobile' );
:node(tbl)
        end
if maintitle then
    end
nav:attr('aria-labelledby', mw.uri.anchorEncode(maintitle))
else
nav:attr('aria-label', 'Навигационный шаблон')
end
end


    renderTrackingCategories(res)
renderTrackingCategories(res)


    return tostring(res)
return striped(tostring(res))
end
end


function p.navbox(frame)
function p.navbox(frame)
    if not getArgs then
if not getArgs then
        getArgs = require('Module:Arguments').getArgs
getArgs = require('Module:Arguments').getArgs
    end
end
    args = getArgs(frame, {wrappers = {'Шаблон:Навигационная таблица', 'Шаблон:Навигационная таблица/песочница'}})
args = getArgs(frame, {wrappers = {'Шаблон:Навигационная таблица', 'Шаблон:Навигационная таблица/песочница'}})


    -- Read the arguments in the order they'll be output in, to make references number in the right order.
-- Read the arguments in the order they'll be output in, to make references number in the right order.
    local _
local _
    _ = maintitle
_ = maintitle
    _ = above
_ = above
    for i = 1, 23 do
for i = 1, 23 do
        _ = args["group" .. tostring(i)] and args["заголовок" .. tostring(i)] and args["группа" .. tostring(i)]
_ = args["group" .. tostring(i)] and args["заголовок" .. tostring(i)] and args["группа" .. tostring(i)]
        _ = args["list" .. tostring(i)] and args["список" .. tostring(i)]
_ = args["list" .. tostring(i)] and args["список" .. tostring(i)]
    end
end
    _ = below
_ = below


    return p._navbox(args)
return p._navbox(args)
end
end


return p
return p
Анонимный участник
Источник — https://licenseplates.ru/Служебная:Сравнение_версий/57733
Cookie-файлы помогают нам предоставлять наши услуги. Используя наши сервисы, вы соглашаетесь с использованием cookie-файлов.

Навигация