Diferencia entre revisiones de «Módulo:For»
De Familia Sanchez Arjona
(Removed "/sandbox" on call to Module:Hatnote list) |
m (7 revisiones importadas) |
||
| (No se muestran 3 ediciones intermedias de otro usuario) | |||
| Línea 13: | Línea 13: | ||
--Implements {{For}} but takes a manual arguments table | --Implements {{For}} but takes a manual arguments table | ||
function p._For (args) | function p._For (args) | ||
| − | local use = args[1] --cases with parameter 1 unspecified | + | local use = args[1] --cases with parameter 1 unspecified should probably be flagged |
| + | if use == 'other uses' then | ||
| + | use = use .. '[[Category:Hatnote templates using unusual parameters]]' | ||
| + | end | ||
local pages = {} | local pages = {} | ||
| − | for k, v in ipairs(args) do | + | function two (a, b, c) return a, b, 1 end --lets us run ipairs from 2 |
| − | + | for k, v in two(ipairs(args)) do table.insert(pages, v) end | |
| − | |||
return mHatnote._hatnote( | return mHatnote._hatnote( | ||
mHatlist.forSeeTableToString({{use = use, pages = pages}}) | mHatlist.forSeeTableToString({{use = use, pages = pages}}) | ||
Revisión actual del 13:28 31 may 2016
Implements {{for}}.
local mArguments --initialize lazily
local mHatlist = require('Module:Hatnote list')
local mHatnote = require('Module:Hatnote')
local p = {}
--Implements {{For}} from the frame
--uses capitalized "For" to avoid collision with Lua reserved word "for"
function p.For (frame)
mArguments = require('Module:Arguments')
return p._For(mArguments.getArgs(frame))
end
--Implements {{For}} but takes a manual arguments table
function p._For (args)
local use = args[1] --cases with parameter 1 unspecified should probably be flagged
if use == 'other uses' then
use = use .. '[[Category:Hatnote templates using unusual parameters]]'
end
local pages = {}
function two (a, b, c) return a, b, 1 end --lets us run ipairs from 2
for k, v in two(ipairs(args)) do table.insert(pages, v) end
return mHatnote._hatnote(
mHatlist.forSeeTableToString({{use = use, pages = pages}})
)
end
return p
