Colani: 1 versie geïmporteerd: Category:Commons templates-i18n

2024-07-29T10:03:03Z

1 versie geïmporteerd: Category:Commons templates-i18n

Nieuwe pagina

-- =============================================================================
-- Automatically add categories to a page
-- =============================================================================

require("strict")

local makesortkey = require "Module:MakeSortKey"

local p = {}

-- -----------------------------------------------------------------------------
-- Main function
-- -----------------------------------------------------------------------------

function p.autoCat(candidates, criterion, sortkey)
-- Make sure that sortkey is not nil
local sortkey2 = sortkey or ""
-- Compile list of categories to include
local result = ""
for chain in candidates:gmatch("[^\n]+") do
local category, sortkey1
for candidate in chain:gmatch("[^;]+") do
local base
base, sortkey1 = candidate:match("(.*):(.*)")
if not base then
base = candidate
sortkey1 = ""
end
if base ~= "-" then
-- First try meta category "by criterion"
if criterion then
category = "Category:" .. base .. " by " .. criterion
if mw.title.new(category).exists then
sortkey1 = "" -- No sort prefix in meta categories
break
end
end
-- Then try the base category
category = "Category:" .. base
if mw.title.new(category).exists then
break
end
else
-- "-" means we don't want any category at this point
category = nil
end
end
if category then
result = result .. "[[" .. category
if sortkey1 .. sortkey2 ~= "" then
result = result .. "|" .. makesortkey.makeSortKey(sortkey1 .. sortkey2)
end
result = result .. "]]"
end
end
return result
end

-- =============================================================================

return p

Module:Autocat - Bewerkingsoverzicht

Colani: 1 versie geïmporteerd: Category:Commons templates-i18n