Module:Compact list - Revision history

Hike395: emit hlist rather than raw text string: more accessible

2022-12-29T04:04:30Z

emit hlist rather than raw text string: more accessible

← Previous revision		Revision as of 04:04, 29 December 2022
Line 1:		Line 1:
	local getArgs = require('Module:Arguments').getArgs		local getArgs = require('Module:Arguments').getArgs
	local clist = require('Module:Collapsible list').main		local clist = require('Module:Collapsible list').main
			local hlist = require('Module:List').horizontal
	local compressSparseArray = require('Module:TableTools').compressSparseArray		local compressSparseArray = require('Module:TableTools').compressSparseArray
	local p = {}		local p = {}
Line 35:		Line 36:
	values = compressSparseArray(values) --- squeeze out gaps/nils in values, keep ordering		values = compressSparseArray(values) --- squeeze out gaps/nils in values, keep ordering
	local limit = tonumber(args._limit) or 4		local limit = tonumber(args._limit) or 4
			if #values == 0 then
			return ''
			end
			if #values == 1 then
			return values[1]
			end
	if #values > limit then		if #values > limit then
	return clist(values) --- if longer than limit, call Module:Collapsible list		return clist(values) --- if longer than limit, call Module:Collapsible list
	end		end
	return ~~mw.text.listToText~~(values) --- otherwise ~~just~~ ~~print out pretty text~~ list		return hlist(values) --- otherwise create horizontal list
	end		end

MusikBot II: Protected "Module:Compact list": High-risk template or module (more info) ([Edit=Require autoconfirmed or confirmed access] (indefinite))

2020-05-04T18:00:34Z

Protected "Module:Compact list": High-risk template or module (more info) ([Edit=Require autoconfirmed or confirmed access] (indefinite))

← Previous revision	Revision as of 18:00, 4 May 2020
(No difference)

Hike395: Lua to produce compact list from a set of named arguments

2020-04-13T06:29:41Z

Lua to produce compact list from a set of named arguments

New page

local getArgs = require('Module:Arguments').getArgs
local clist = require('Module:Collapsible list').main
local compressSparseArray = require('Module:TableTools').compressSparseArray
local p = {}

--[[
Combine named-and-numbered arguments into a pretty list.
"Named-and-numbered" means foo, foo0, foo_1, foo234: anything that matches foo_?%d+

Arguments:
args[1] = name to search arguments
rest of args = arguments to search
Returns:
Pretty list, in order of argument number.
"foo" comes first, then "foo0", "foo1", ... "fooN"
The argument numbering does not have to be sequential

If number of args that match <= args[_limit] (4 default),
returns text list of the form "A, B, C and D"
otherwise returns collapsible list ({{clist}})
--]]
function p._main(args)
local pattern = "^"..args[1].."_?(%d+)$" -- pattern to match
local values = {}
for k, v in pairs(args) do --- loop through all arguments
if k == args[1] then --- if argument is just "foo", put it first
values[1] = v
else
ord = tonumber(mw.ustring.match(k,pattern)) --- if "foo_?%d+", extract number
if ord then
values[ord+2] = v --- put value into list at number+2 (to keep "foo" first, even for foo0)
end
end
end
values = compressSparseArray(values) --- squeeze out gaps/nils in values, keep ordering
local limit = tonumber(args._limit) or 4
if #values > limit then
return clist(values) --- if longer than limit, call Module:Collapsible list
end
return mw.text.listToText(values) --- otherwise just print out pretty text list
end

function p.main(frame)
local args = getArgs(frame)
return p._main(args)
end

return p