Module:For: Difference between revisions

From Zoophilia Wiki
Jump to navigationJump to search
meta>Nihiltres
Updated from sandbox: categorizes as unusual "other uses" by defaulting as well as typed-out "other uses"
meta>Nihiltres
Updated from sandbox: prints error if first parameter is empty (previously defaulted to "other uses"); exact-match "other uses" is still categorized
Line 1: Line 1:
local mArguments --initialize lazily
local mArguments --initialize lazily
local yesno = require('Module:Yesno')
local mHatlist = require('Module:Hatnote list')
local mHatlist = require('Module:Hatnote list')
local mHatnote = require('Module:Hatnote')
local mHatnote = require('Module:Hatnote')
local yesNo = require('Module:Yesno')
local p = {}
local p = {}


Line 15: Line 15:
function p._For (args)
function p._For (args)
local use = args[1]
local use = args[1]
local category = ''
if (not use) then
if (not use or use == 'other uses') and
return mHatnote.makeWikitextError(
(not args.category or yesno(args.category)) then
'no context parameter provided. Use {{other uses}} for "other uses" hatnotes.',
category = '[[Category:Hatnote templates using unusual parameters]]'
'Template:For#Errors',
args.category
)
end
end
local pages = {}
local pages = {}
Line 26: Line 28:
mHatlist.forSeeTableToString({{use = use, pages = pages}}),
mHatlist.forSeeTableToString({{use = use, pages = pages}}),
{selfref = args.selfref}
{selfref = args.selfref}
) .. category
) .. (
(use == 'other uses') and yesNo(args.category) and
'[[Category:Hatnote templates using unusual parameters]]' or ''
)
end
end


return p
return p

Revision as of 16:25, 16 August 2018

Implements {{for}}.


local mArguments --initialize lazily
local mHatlist = require('Module:Hatnote list')
local mHatnote = require('Module:Hatnote')
local yesNo = require('Module:Yesno')
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]
	if (not use) then
		return mHatnote.makeWikitextError(
			'no context parameter provided. Use {{other uses}} for "other uses" hatnotes.',
			'Template:For#Errors',
			args.category
		)
	end
	local pages = {}
	function two (a, b) 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}}),
		{selfref = args.selfref}
	) .. (
			(use == 'other uses') and yesNo(args.category) and
			'[[Category:Hatnote templates using unusual parameters]]' or ''
		)
end

return p