Module:Separated entries: Difference between revisions

From Brunswick MD History
Jump to navigation Jump to search
m (1 revision imported)
 
m (allow the first positional parameter to be specified (useful in some templates))
Line 2: Line 2:
-- an optional separator. The final separator (the "conjunction") can be
-- an optional separator. The final separator (the "conjunction") can be
-- specified independently, enabling natural-language lists like
-- specified independently, enabling natural-language lists like
-- "foo, bar, baz and qux".
-- "foo, bar, baz and qux". The starting parameter can also be specified.


local compressSparseArray = require('Module:TableTools').compressSparseArray
local compressSparseArray = require('Module:TableTools').compressSparseArray
Line 12: Line 12:
and mw.text.decode(args.separator) or ''
and mw.text.decode(args.separator) or ''
local conjunction = args.conjunction and mw.text.decode(args.conjunction) or separator
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.
-- Discard named parameters.
local values = compressSparseArray(args)
local values = compressSparseArray(args)
Line 17: Line 22:
end
end


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

Revision as of 23:05, 25 June 2018

-- 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() p.br = makeInvokeFunction('
') p.comma = makeInvokeFunction(mw.message.new('comma-separator'):plain())

return p