![](http://upload.wikimedia.org/wikipedia/commons/thumb/4/43/Test_Template_Info-Icon_-_Version_%282%29.svg/50px-Test_Template_Info-Icon_-_Version_%282%29.svg.png)
This module implements Template:Caselist. See the template page for documentation.
-- This module implements {{caselist}}.
local mNavbox = require('Module:Navbox')
local p = {}
local function wraplinks(s)
-- add allow wrap
if s and not mw.ustring.match(s, '<span class="wrap">') then
-- probably a more efficient way to match 40 or more characters
local m = '[^%[%]<>|][^%[%]<>|][^%[%]<>|][^%[%]<>|][^%[%]<>|]'
m = m .. m .. m .. m
m = m .. m
s = mw.ustring.gsub(s,
'%[%[(' .. m .. '[^%[%]<>|]*)%]%]',
'[[%1|<span class="wrap">%1</span>]]')
s = mw.ustring.gsub(s,
'%[%[([^%[%]<>|]*)|(' .. m .. '[^%[%]<>|]*)%]%]',
'[[%1|<span class="wrap">%2</span>]]')
end
return s
end
function p._main(args)
local nargs = {} -- Navbox args
-- Cases
do
local caseNums = {}
for k in pairs(args) do
if type(k) == 'string' then
local num = k:match('^case([1-9][0-9]*)$')
if num then
table.insert(caseNums, tonumber(num))
end
end
end
if #caseNums < 1 then
error("no 'case1', 'case2', etc. parameters specified in [[Template:Caselist]]", 2)
end
table.sort(caseNums)
for i, num in ipairs(caseNums) do
nargs['list' .. tostring(i)] = wraplinks(args['case' .. tostring(num)])
end
end
-- Other args
nargs.name = args.name or 'Caselist'
nargs.navbar = args.navbar or 'top'
nargs.style = string.format(
'width: %s; text-align: %s; font-size: 80%%; line-height: 1.5em; background-color: #fafafa; %s',
args.width or '350px',
args.textalign or 'center',
args.align == 'left'
and 'float: left; clear: left; margin: 0 1em 1em 0;'
or 'float: right; clear: right; margin: 0 0 1em 1em;'
)
nargs.evenodd = 'off'
nargs.title = args.title or args.name or error(
"no 'title' or 'name' parameters specified in [[Template:Caselist]]",
2
)
nargs.below = args.notes or args.below
nargs.tracking = 'no'
return mNavbox._navbox(nargs)
end
function p.main(frame)
local args = require('Module:Arguments').getArgs(frame, {
wrappers = 'Template:Caselist'
})
return p._main(args)
end
return p