وحدة:Pagesincat
المظهر
توثيق الوحدة [أنشئ] [محو الاختزان][استخدامات] [قوالب]
-- وحدة تعمل نفس عمل {{PAGESINCATEGORY}}
-- ولكن بدون أخطاء
local p = {}
-- génère une erreur
function p.erreur(texte)
return '<span class="error">' .. (texte or "''لا أخطاء معلنة''") .. "</span>"
end
-- من أجل تجربة "pageincategory"
function p.pagesincat(frame)
-- اسم التصنيف
local args = frame:getParent().args
local cat = args[1]
-- نوع الطلب
local arg = frame.args["type"] or args["type"]
-- تهيئة شكل النتيجة ?
local mef = args["form"]
local sel -- الاختيار
-- في غياب اسم التصنيف يستعمل اسم الصفحة الحالية
if (cat == nil or cat == "") then
local titre = mw.title.getCurrentTitle()
-- التأكد من أنها تصنيف
if (titre.namespace ~= 14) then
return p.erreur("لم يتم تزويد اسم للصفحة والصفحة الحالية ليست تصنيفا")
end
-- نستعمل عنوان الصفحة الحالية
cat = mw.title.getCurrentTitle().text
end
-- نطلع على البيانات
if (arg == "all" or arg == nil or arg == "*") then
sel = "all"
elseif (arg == "cats") then
sel = "subcats"
elseif (arg == "files") then
sel = "files"
elseif (arg == "pages") then
sel = "pages"
else
return p.erreur("المعلومة '" .. (arg or "<nil>") .. "' غير معروفة")
end
local res = mw.site.stats.pagesInCategory(cat, sel)
if (res == nil) then
return p.erreur("خطأ في استرجاع البيانات")
end
-- في حالة تهيئة الشكل
if (mef ~= nil) then
return mw.getContentLanguage():formatNum(res)
else
return tostring(res)
end
end
return p