|
-- This module implements {{Sidebar}}
--
require('Module:No globals')
local p = {}
local getArgs = require('Module:Arguments').getArgs
local HtmlBuilder = require('Module:HtmlBuilder')
local navbar = require('Module:Navbar')._navbar
local function trimAndAddAutomaticNewline(s)
-- For compatibility with the original {{sidebar with collapsible lists}}
-- implementation, which passed some parameters through {{#if}} to trim
-- their whitespace. This also triggered the automatic newline behavior.
end
local function _sidebarhasSubgroup(argss)
if mw.ustring.find(s, 'vertical%-navbox%-subgroup') then
local root = HtmlBuilder.create() ▼ return true
else
return false
function p.sidebar(frame, args)
returnargs = func(getArgs(frame )) ▼
▲ local root = HtmlBuildermw.html.create()
local child = args.child and mw.text.trim(args.child) == 'yes'
root = root:tag('table')
if not child then
root = root
.tag:addClass('tablevertical-navbox')
.:addClass(args.wraplinks ~= 'true' and 'vertical-navboxnowraplinks' or nil)
.:addClass(args.wraplinksbodyclass ~=or 'true' and 'nowraplinks'args.class)
.addClass:css('float', args.bodyclassfloat or args.class'right')
.attr:css('cellspacingclear', (args.cellspacingfloat == 'none' and 'both') or 5args.float or 'right')
.attr:css('cellpaddingwidth', args.cellpaddingwidth or 0'22.0em')
.:css('floatmargin', args.float == 'left' and '0 1.0em 1.0em 0' or 'right0 0 1.0em 1.0em')
.:css(' text-alignbackground', ' center#f9f9f9') ▼
.css('clear', (args.float == 'none' and 'both') or args.float or 'right')
.:css('widthborder', args.width'1px orsolid '22.0em#aaa')
.:css(' line-heightpadding', ' 10. 4em2em') ▼
.css('margin', args.float == 'left' and '0 1.0em 1.0em 0' or '0 0 1.0em 1.0em')
.:css('backgroundborder-spacing', '#f9f9f90.4em 0')
.:css('bordertext-align', '1px solid #aaacenter')
.:css('paddingline-height', '01.2em4em')
.:css('borderfont-spacingsize', '0.4em 088%')
.:cssText(args.bodystyle or args.style) ▼
▲ .css('text-align', 'center')
▲ .css('line-height', '1.4em')
.css('font-size', '88%') ▼▲ .cssText(args.bodystyle or args.style)
if args.outertitle then
root
.:tag('caption')
.:addClass(args.outertitleclass)
.:css('padding-bottom', '0.2em')
.:css('font-size', '125%')
.:css('line-height', '1.2em')
.:css('font-weight', 'bold')
.:cssText(args.outertitlestyle)
.:wikitext(args.outertitle)
end
if args.topimage then
local imageCell = root.:tag('tr').:tag('td')
imageCell
.:addClass(args.topimageclass)
.:css('padding', '0.4em 0')
.:cssText(args.topimagestyle)
.:wikitext(args.topimage)
if args.topcaption then
imageCell
.:tag('div')
.:css('padding-top', '0.2em')
.:css('line-height', '1.2em')
.:cssText(args.topcaptionstyle)
.:wikitext(args.topcaption)
end
end
if args.pretitle then
root
.:tag('tr')
.:tag('td')
.:addClass(args.pretitleclass)
.:cssText(args.basestyle)
.:css('padding-top', args.topimage and '0.2em' or '0.4em')
.:css('line-height', '1.2em')
.:cssText(args.pretitlestyle)
.:wikitext(args.pretitle)
end
else
root
:addClass('vertical-navbox-subgroup')
▲ .:css(' font-sizewidth', ' 88100%')
:css('margin', '0px')
:css('border-spacing', '0px')
:addClass(args.bodyclass or args.class)
:cssText(args.bodystyle or args.style)
end
if child then
root
.:wikitext(args.title)
.tag('/th', {unclosed = true})
.tag('/tr', {unclosed = true})
else
root
.:tag('tr')
.:tag('th')
.:addClass(args.titleclass)
.:cssText(args.basestyle)
.:css('padding', '0.2em 0.4em 0.2em')
.:css('padding-top', args.pretitle and 0)
.:css('font-size', '145%')
.:css('line-height', '1.2em')
.:cssText(args.titlestyle)
.:wikitext(args.title)
end
end
if args.image then
local imageCell = root.:tag('tr').:tag('td')
imageCell
.:addClass(args.imageclass)
.:css('padding', '0.2em 0 0.4em')
.:cssText(args.imagestyle)
.:wikitext(args.image)
if args.caption then
imageCell
.:tag('div')
.:css('padding-top', '0.2em')
.:css('line-height', '1.2em')
.:cssText(args.captionstyle)
.:wikitext(args.caption)
end
end
if args.above then
root
.:tag('tr')
.:tag('td')
.:addClass(args.aboveclass)
.:css('padding', '0.3em 0.4em 0.3em')
.:css('font-weight', 'bold')
.:cssText(args.abovestyle)
.:newline() -- newline required for bullet-points to work
.:wikitext(args.above)
end
if heading then
root
.:tag('tr')
.:tag('th')
.:addClass(args.headingclass)
.:css('padding', '0.1em')
.:cssText(args.basestyle)
.:cssText(args.headingstyle)
.:cssText(args['heading' .. num .. 'style'])
.:newline()
.:wikitext(heading)
end
local content = args['content' .. num]
if content then
root
.:tag('tr')
.:tag('td')
.:addClass(args.contentclass)
.:css('padding', hasSubgroup(content) and '0.1em 0 0.2em' or '0 0.1em 0.4em')
.:cssText(args.contentstyle)
.:cssText(args['content' .. num .. 'style'])
.:newline()
.:wikitext(content)
.:done()
.:newline() -- Without a linebreak after the </td>, a nested list like "* {{hlist| ...}}" doesn't parse correctly.
end
end
if args.below then
root
.:tag('tr')
.:tag('td')
.:addClass(args.belowclass)
.:css('padding', '0.3em 0.4em 0.3em')
.:css('font-weight', 'bold')
.:cssText(args.belowstyle)
.:newline()
.:wikitext(args.below)
end
if not child then
local navbarArg = args.navbar or args.tnavbar
if navbarArg ~= 'none' and navbarArg ~= 'off' and (args.name or frame:getParent():getTitle():gsub('/sandbox$', '') ~= 'Template:Sidebar') then
root
.:tag('tr')
.:tag('td')
.:css('text-align', 'right')
.:css('font-size', '115%')
.:cssText(args.navbarstyle or args.tnavbarstyle)
.:wikitext(navbar{
args.name,
mini = 1,
end
return tostring(root) .. (child and '[[Category:Pages using sidebar with the child parameter]]' or '')
end
function _collapsibleSidebarp.collapsible(argsframe)
local args = getArgs(frame)
args.abovestyle = 'border-top: 1px solid #aaa; border-bottom: 1px solid #aaa;' .. (args.abovestyle or '')
args.belowstyle = 'border-top: 1px solid #aaa; border-bottom: 1px solid #aaa;' .. (args.belowstyle or '')
args.navbarstyle = 'padding-top: 0.6em;' .. (args.navbarstyle or args.tnavbarstyle or '')
if not args.name and frame:getParent():getTitle():gsub('/sandbox$', '') == 'Template:Sidebar with collapsible lists' then
args.navbar = 'none'
end
local contentArgs = {}
for k, v in pairs(args) do
local num = ('' string.. k):match(k, '^list(%d+)$')
if num then
local expand = args.expanded and (args.expanded == 'all' or args.expanded == args['list' .. num .. 'name'])
local row = HtmlBuildermw.html.create('div')
row
.:addClass('NavFrame')
.:addClass((not expand) and 'collapsed' or nil)
.:css('border', 'none')
.:css('padding', 0)
.:cssText(args.listframestyle)
.:cssText(args['list' .. num .. 'framestyle'])
.:tag('div')
.:addClass('NavHead')
.:addClass(args.listtitleclass)
.:css('font-size', '105%')
.:css('background', 'transparent')
.:css('text-align', 'left')
.:cssText(args.basestyle)
.:cssText(args.listtitlestyle)
.:cssText(args['list' .. num .. 'titlestyle'])
.:wikitext(trimAndAddAutomaticNewline(args['list' .. num .. 'title'] or 'List'))
.:done()
.:tag('div')
.:addClass('NavContent')
.:addClass(args.listclass)
.:addClass(args['list' .. num .. 'class'])
.:css('font-size', '105%')
.:css('padding', '0.2em 0 0.4em')
.:css('text-align', 'center')
.:cssText(args.liststyle)
.:cssText(args['list' .. num .. 'style'])
.:wikitext(trimAndAddAutomaticNewline(args['list' .. num]))
contentArgs['content' .. num] = tostring(row)
end
args[k] = v
end
return _sidebarp.sidebar(frame, args)
function makeWrapper(func)
return function(frame)
getArgs = require('Module:Arguments').getArgs
▲ return func(getArgs(frame))
end
return {p
sidebar = makeWrapper(_sidebar),
collapsible = makeWrapper(_collapsibleSidebar)
}
|