Difference between revisions of "Module:Caselist"
Jump to navigation
Jump to search
blackwiki>Frietjes |
blackwiki>Frietjes (wrap long links to avoid overflow outside of box (e.g., see Template:Clist vicarious liability, Template:Clist wrongs restitution, Template:Clist eu treaties, ...)) |
||
| Line 4: | Line 4: | ||
local p = {} | 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) | function p._main(args) | ||
| Line 24: | Line 42: | ||
table.sort(caseNums) | table.sort(caseNums) | ||
for i, num in ipairs(caseNums) do | for i, num in ipairs(caseNums) do | ||
| − | nargs['list' .. tostring(i)] = args['case' .. tostring(num)] | + | nargs['list' .. tostring(i)] = wraplinks(args['case' .. tostring(num)]) |
end | end | ||
end | end | ||
Revision as of 23:35, 14 June 2017
-- 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