Modul:Navbox: Unterschied zwischen den Versionen

-- This module implements {{Navbox}}

--

local p = {}

                 :css('height', '2px')

                 :tag('td')

     end

     tableRowAdded = true

     return tbl:tag('tr')

end

     -- 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.

         -- 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.

         if args.state == 'plain' then spacerSide = 'right' end

             fontstyle = (args.basestyle or '') .. ';' .. (args.titlestyle or '') ..  ';background:none transparent;border:none;'

         })

     end

     -- Render the spacer div.

     if spacerSide then

local function renderTitleRow(tbl)

     if not args.title then return end

     local titleRow = addTableRow(tbl)

                 :wikitext(args.titlegroup)

     end

     local titleCell = titleRow:tag('th'):attr('scope', 'col')

     if args.titlegroup then

         titleCell

             :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)

         :addClass('navbox-title')

         :attr('colspan', titleColspan)

     renderNavBar(titleCell)

                 :wikitext(addNewline(args.below))

end

--

--  List rows

local function renderListRow(tbl, listnum)

     local row = addTableRow(tbl)

     if listnum == 1 and args.imageleft then

         row

                     :wikitext(addNewline(args.imageleft))

     end

         local groupCell = row:tag('th')

         if args.groupwidth then

             groupCell:css('width', args.groupwidth)

         end

             :cssText(args.groupstyle)

             :cssText(args['group' .. listnum .. 'style'])

             :wikitext(args['group' .. listnum])

     end

     local listCell = row:tag('td')

         listCell

             :css('text-align', 'left')

         listCell:attr('colspan', 2)

     end

         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

local function needsHorizontalLists()

     local listClasses = {'plainlist', 'hlist', 'hlist hnum', 'hlist hwrap', 'hlist vcard', 'vcard hlist', 'hlist vevent'}

     for i, cls in ipairs(listClasses) do

     local subpage = title.subpageText

     if subpage == 'doc' or subpage == 'sandbox' or subpage == 'testcases' then return end

     for i, cat in ipairs(getTrackingCategories()) do

     end

end

             :addClass(args.state or 'autocollapse')

     end

     tbl:css('border-spacing', 0)

     if border == 'subgroup' or border == 'child' or border == 'none' then

     end

     tbl:cssText(args.innerstyle)

     renderTitleRow(tbl)

     renderAboveRow(tbl)

     for i, listnum in ipairs(listnums) do

     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+)$')

     end

     table.sort(listnums)

     border = trim(args.border or args[1] or '')

                         :node(tbl)

     end

     renderTrackingCategories(res)

     return tostring(res)

end

function p.navbox(frame)

     if not getArgs then

     end

     args = getArgs(frame, {wrappers = 'Template:Navbox'})

         _ = args["group" .. tostring(i)]

         _ = args["list" .. tostring(i)]

     _ = args.below

     return p._navbox(args)

end

return p