Documentation for this module may be created at Module:ItemList/doc
local p = {}
function p.itemlist( f )
local args = f:getParent().args
local listtype, extrastyle = 'ul', ''
local iconsize = args.iconsize or '30px'
local showOne = args.showQuantityOne or false
local asPerCent = args.showQuantityAsPerCent or false
if args.columns ~= nil then
extrastyle = extrastyle..'column-count:'..args.columns..';'
end
if args.columnWidth ~= nil then
extrastyle = extrastyle..'column-width:'..args.columnWidth..';'
end
if args.marginLeft ~= nil then
extrastyle = extrastyle..'margin-left:'..args.marginLeft..';'
end
if args.listtype ~= nil then
if args.listtype == 'ol' then
listtype = 'ol'
else -- none
extrastyle = extrastyle..'list-style:none;margin-left:0;'
end
end
-- split first value at comma, e.g. for data from module:dv
local items = {}
for v in mw.text.gsplit(args[1], ',', true) do
if #v > 0 then -- skip empty
table.insert(items, v)
end
end
-- append rest parameters
for _,v in ipairs(args) do
if _ > 1 and #v > 0 then
table.insert(items, v)
end
end
-- read arguments list into itemList (consists of tables, at index 1 is the text, at index 2 the quantity (optional))
local itemList, i, lastItem = {}, 0, nil
for _, item in ipairs(items) do
item = item:match "^%s*(.-)%s*$" -- trim
if string.len(item) > 0 then
if lastItem and (item:match "^[%d.]*$" or item:match "^[%d.]*%-[%d.]*$") then
if asPerCent then
itemList[i][2] = item * 100 -- item is per cent value
elseif item ~= '1' or showOne then
itemList[i][2] = item -- item is quantity
end
lastItem = nil
else
table.insert(itemList, {item, nil} ) -- item is text
i = i + 1
lastItem = item
end
end
end
-- output itemList
local output = {}
local quantitySign = asPerCent and '% ' or ' × '
for _, item in ipairs(itemList) do
local fileName = string.gsub(item[1],':',' ')
table.insert(output, '<li>'..(item[2] ~= nil and item[2]..quantitySign or '')..'[[File:'..fileName..'.png|'..iconsize..']] '..'[['..(item[1])..']]'..'</li>')
end
if #output == 0 then
return
end
-- if the list is long and has no explicit style, break it into columns automatically
if #output > 5 and extrastyle == '' then
extrastyle = 'column-width:15em;'
end
return '<'..listtype..(extrastyle ~= '' and ' style="'..extrastyle..'"' or '')..'>'..table.concat(output, '')..'</'..listtype..'>'
end
return p