Difference between revisions of "Module:Separated entries"

From Dharmawiki
Jump to navigation Jump to search
m (1 revision imported)
 
m (1 revision imported)
 
(3 intermediate revisions by 3 users not shown)
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

Latest revision as of 14:20, 31 December 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