Modul:Pages with authority control identifiers
Mogoče bi radi ustvarili dokumentacijsko stran za ta Scribunto modul Urejevalci lahko preizkušate ta modul v peskovniku (uredi | primerjava) in testnihprimerih (ustvari). Prosimo, da dodate kategorije v /dok podstran. Podstrani te predloge. |
require('Module:No globals')
local p = {}
local ac_conf = require('Modul:Authority control').conf
local rmCats = require('Modul:Suppress categories').main
local currentTitle = mw.title.getCurrentTitle()
local title = currentTitle.text
-- Local Utility Functions
local function whichTOC( frame )
-- standardize TOC behavior via {{CatAutoTOC}}
return frame:expandTemplate{ title = 'CatAutoTOC', args = { align = 'center' } }
end
local function redCatCheck( cat ) --cat == 'Blah' (not 'Kategorija:Blah', '[[Kategorija:Blah]]', etc.)
if cat and cat ~= '' and mw.title.new(cat, 14).exists == false then
return '[[Kategorija:Strani z rdeče-povezanimi kategorijami identifikatorjev normativne kontrole]]'
end
return ''
end
local function addCat( cat, id )
if id and id ~= '' then
return '[[Kategorija:'..cat..'|'..id..']]'..redCatCheck(cat)
else
return '[[Kategorija:'..cat..']]'..redCatCheck(cat)
end
end
--For use in [[Kategorija:Articles with authority control information]], i.e. on [[Kategorija:Articles with VIAF identifiers]]
local function wp( frame, id )
for _, conf in pairs( ac_conf ) do
if conf.category == id or conf[1] == id then
local linktarget = conf.link or conf[1]..' (identifikator)'
local link = '[['..linktarget..'|'..conf[1]..']]'
local wdpl = ':d:Property:P'..conf[2]
local example = 'Identifikator '..conf[1]..' se pojavi kot '.. rmCats(conf[3](conf[5]))..' v razdelku '..conf[4]..'.'
local txCatExplain = frame:expandTemplate{ title = 'Razlaga kategorije', args = {'člankom z '..link..' identifikatorji.'..example..' Prosimo, da ne dodajate [[Wikipedija:Kategorizacija#Ustvarjanje podkategorij|podkategorij]].'} }
local txCatMore = frame:expandTemplate{ title = 'Cat more', args = {'Wikipedija:Normativna kontrola', wdpl} }
local txEmptyCat = frame:expandTemplate{ title = 'Prazna kategorija' }
local txWPCat = frame:expandTemplate{ title = 'Projektna kategorija', args = { hidden = 'yes', tracking = 'yes' } }
local txTOC = whichTOC( frame )
local wpCat = 'Wikipedijini članki s podatki o normativni kontroli'
local outString = txCatExplain..txCatMore..txEmptyCat..txWPCat..txTOC..'\n'..'Strani se v to kategorijo dodajajo izključno z uporabo [[Modul:Authority control]].'..addCat(wpCat, id)
return outString
end
end
return ''
end
--For use in [[Kategorija:Wikipedijini članki z napakami v podatkih o normativni kontroli]], i.e. on [[Kategorija:Articles with faulty VIAF identifiers]]
local function wpfaulty( frame, id )
for _, conf in pairs( ac_conf ) do
if conf.category == id or conf[1] == id then
local linktarget = conf.link or conf[1]..' (identifikator)'
local wdpl = ':d:Property:P'..conf[2]
local txCatMore = frame:expandTemplate{ title = 'Cat more', args = {'Wikipedija:Normativna kontrola', linktarget, wdpl} }
local txEmptyCat = frame:expandTemplate{ title = 'Prazna kategorija' }
local txWPCat = frame:expandTemplate{ title = 'Projektna kategorija', args = { hidden = 'yes', tracking = 'yes' } }
local txDirtyCat = frame:expandTemplate{ title = 'Pollutedcat' }
local txTOC = whichTOC( frame )
local idCat = 'Wikipedijini članki z identifikatorji '..id..''
local wpfCat = 'Wikipedijini članki z napakami v podatkih o normativni kontroli'
local outString = txCatMore..txEmptyCat..txWPCat..txDirtyCat..txTOC..'\n'..
'Strani se v to kategorijo dodajajo izključno z uporabo [[Modul:Authority control]].'..
addCat(idCat)..addCat(wpfCat, id)
return outString
end
end
return ''
end
-- Main/External Call
function p.autoDetect( frame )
if currentTitle.namespace == 14 then --cat space
local wpfaultyID = mw.ustring.match(title, 'Wikipedijini članki z okvarjenimi identifikatorji ([%w%.%- ]+)')
local wpID = mw.ustring.match(title, 'Wikipedijini članki z identifikatorji ([%w%.%- ]+)')
if wpfaultyID then return wpfaulty( frame, wpfaultyID ) --must be before wpID check, in case they both match
elseif wpID then return wp( frame, wpID ) --to keep the regex simple
else return '[[Kategorija:Strani z neznano kategorijo identifikatorjev normativne kontrole]]'
end
end
return ''
end
return p