وحدة: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(
			'لم يُوفّر وسيط للسياق. استخدم {{استعمالات أخرى}} لملاحظات "لاستعمالات أخرى" العلوية.',
			'قالب:من_أجل#أخطاء',
			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
	local title = mw.title.getCurrentTitle()
	local skipCat = title.isTalkPage or title.namespace == 2 --don't categorise talk pages and userspace
	local oddCat = skipCat and '' or '[[تصنيف:قوالب ملاحظات علوية تستخدم وسائط غير معتادة]]'
	local category = yesNo(args.category)
	local image = '[[ملف:Disambig_gray_RTL.svg|20px|وصلة=ويكيبيديا:توضيح]]'

	return mHatnote._hatnote(
		image .. '  ' .. mHatlist.forSeeTableToString({{use = use, pages = pages}}),
		{selfref = args.selfref}
	) .. (
			(use == 'معانٍ أخرى') and ((category == true) or (category == nil)) and
			oddCat or ''
		)
end

return p