Module:Separated entries

From Gerald R. Lucas
Revision as of 15:54, 17 December 2018 by en>Amorymeltzer (Changed protection level for "Module:Separated entries": High-risk Lua module: Over 2M transclusions ([Edit=Require administrator access] (indefinite) [Move=Require administrator access] (indefinite)))
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)

-- This module takes positional parameters as input and concatenates them with -- an optional separator. The final separator (the "conjunction") can be -- specified independently, enabling natural-language lists like -- "foo, bar, baz and qux". The starting parameter can also be specified.

local compressSparseArray = require('Module:TableTools').compressSparseArray local p = {}

function p._main(args) local separator = args.separator -- Decode (convert to Unicode) HTML escape sequences, such as " " for space. and mw.text.decode(args.separator) or local conjunction = args.conjunction and mw.text.decode(args.conjunction) or separator -- Discard values before the starting parameter. local start = tonumber(args.start) if start then for i = 1, start - 1 do args[i] = nil end end -- Discard named parameters. local values = compressSparseArray(args) return mw.text.listToText(values, separator, conjunction) end

local function makeInvokeFunction(separator, conjunction, first) return function (frame) local args = require('Module:Arguments').getArgs(frame) args.separator = separator or args.separator args.conjunction = conjunction or args.conjunction args.first = first or args.first return p._main(args) end end

p.main = makeInvokeFunction() = makeInvokeFunction('
') p.comma = makeInvokeFunction('comma-separator'):plain())

return p