Module:Navbox with collapsible groups: Difference between revisions

m
(testing)
 
(15 intermediate revisions by 2 users not shown)
Line 1: Line 1:
-- This module implements {{Navbox with collapsible groups}}
-- This module implements {{Navbox with collapsible groups}}
require('Module:No globals')
local q = {}
local p = {}
 
local Navbox = require('Module:Navbox')
local Navbox = require('Module:Navbox')
local getArgs -- lazily initialized


-- helper functions
-- helper functions
Line 22: Line 19:
end
end


function p._navbox(args)
function q._navbox(pargs)
local tracking = ''
-- table for args passed to navbox
-- table for args passed to navbox
local targs = {}
local targs = {}
Line 39: Line 34:
['imageleft']=true,['imageleftstyle']=true
['imageleft']=true,['imageleftstyle']=true
}
}
for k,v in pairs(args) do
for k,v in pairs(pargs) do
if k and type(k) == 'string' then
if k and type(k) == 'string' then
if passthrough[k] then
if passthrough[k] then
Line 46: Line 41:
or k:match('^content[0-9][0-9]*$') ) then
or k:match('^content[0-9][0-9]*$') ) then
local n = mw.ustring.gsub(k, '^[a-z]*([0-9]*)$', '%1')
local n = mw.ustring.gsub(k, '^[a-z]*([0-9]*)$', '%1')
if (targs['list' .. n] == nil and args['group' .. n] == nil
if (targs['list' .. n] == nil and pargs['group' .. n] == nil
and args['sect' .. n] == nil and args['section' .. n] == nil) then
and pargs['sect' .. n] == nil and pargs['section' .. n] == nil) then
targs['list' .. n] = concatstrings(args['list' .. n] or '', args['content' .. n] or '')
targs['list' .. n] = concatstrings(
{pargs['list' .. n] or '', pargs['content' .. n] or ''})
end
end
elseif (k:match('^group[0-9][0-9]*$')  
elseif (k:match('^group[0-9][0-9]*$')  
Line 56: Line 52:
if targs['list' .. n] == nil then
if targs['list' .. n] == nil then
local titlestyle = concatstyles(
local titlestyle = concatstyles(
{args['groupstyle'] or '',args['secttitlestyle'] or '',  
{pargs['groupstyle'] or '',pargs['secttitlestyle'] or '',  
args['group' .. n .. 'style'] or '',  
pargs['group' .. n .. 'style'] or '',  
args['section' .. n ..'titlestyle'] or ''})
pargs['section' .. n ..'titlestyle'] or ''})
local liststyle = concatstyles(
local liststyle = concatstyles(
{args['liststyle'] or '', args['contentstyle'] or '',  
{pargs['liststyle'] or '', pargs['contentstyle'] or '',  
args['list' .. n .. 'style'] or '',  
pargs['list' .. n .. 'style'] or '',  
args['content' .. n .. 'style'] or ''})
pargs['content' .. n .. 'style'] or ''})
local title = concatstrings(
local title = concatstrings(
{args['group' .. n] or '',  
{pargs['group' .. n] or '',  
args['sect' .. n] or '',
pargs['sect' .. n] or '',
args['section' .. n] or ''})
pargs['section' .. n] or ''})
local list = concatstrings(
local list = concatstrings(
{args['list' .. n] or '',  
{pargs['list' .. n] or '',  
args['content' .. n] or ''})
pargs['content' .. n] or ''})
local state = (args['abbr' .. n] and args['abbr' .. n] == args['selected'])  
local state = (pargs['abbr' .. n] and pargs['abbr' .. n] == pargs['selected'])  
and 'uncollapsed' or args['state' .. n] or 'collapsed'
and 'uncollapsed' or pargs['state' .. n] or 'collapsed'
local sargs = {'child', navbar = 'plain', state = state,
basestyle = args['basestyle'],
targs['list' .. n] = Navbox._navbox(
{'child', navbar = 'plain', state = state,
basestyle = pargs['basestyle'],
title = title, titlestyle = titlestyle,
title = title, titlestyle = titlestyle,
list1 = list, liststyle = liststyle,
list1 = list, liststyle = liststyle,
listclass = args['list' .. n .. 'class'],
listclass = pargs['list' .. n .. 'class'],
image = args['image' .. n],
image = pargs['image' .. n],
imageleft = args['imageleft' .. n],
imageleft = pargs['imageleft' .. n],
listpadding = args['listpadding']}
listpadding = pargs['listpadding']})
targs['list' .. n] = Navbox._navbox(sargs)
tracking = tracking .. '<hr /><center><b>k = ' .. k .. ', n = ' .. n .. '</b></center><hr />\n'
for ks,vs in pairs(sargs) do
tracking = tracking .. ks .. ' = ' .. vs .. '<br>\n'
end
tracking = tracking .. '\n<hr />\n'
end
end
end
end
end
end
end
end
 
-- ordering of style and bodystyle
targs['style'] = concatstyles({targs['style'] or '', targs['bodystyle'] or ''})
targs['bodystyle'] = nil
-- child or subgroup
-- child or subgroup
if targs['border'] == nil then targs['border'] = args[1] end
if targs['border'] == nil then targs['border'] = pargs[1] end
-- debug
tracking = tracking .. '<hr /><center><b>targs</b></center><hr />\n'
for k,v in pairs(targs) do
tracking = tracking .. k .. ' = ' .. v .. '<br>\n'
end
tracking = tracking .. '\n<hr />\n'


return Navbox._navbox(targs) .. tracking
return Navbox._navbox(targs)
end
end


function p.navbox(frame)
function q.navbox(frame)
if not getArgs then
local pargs = require('Module:Arguments').getArgs(frame, {wrappers = {'Template:Navbox with collapsible groups'}})
getArgs = require('Module:Arguments').getArgs
 
end
-- local args = getArgs(frame, {wrappers = {'Template:Navbox with collapsible groups'}})
local args = frame:getParent().args
-- 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 _
_ = args.title
_ = pargs.title
_ = args.above
_ = pargs.above
for i = 1, 20 do
for i = 1, 20 do
_ = args["group" .. tostring(i)]
_ = pargs["group" .. tostring(i)]
_ = args["list" .. tostring(i)]
_ = pargs["list" .. tostring(i)]
end
end
_ = args.below
_ = pargs.below


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


return p
return q