Module:Redirect template

require('Module:No globals')

local p = {}

-- key is beginning of arg name. value is table with namespace number and link -- alternatively, a function taking the namespace number and returning a validity -- can be used local namespaceCategories = { all = { function return true end }, main = { 0, 'main' }, help = { 12, 'help' }, portal = { 100, 'portal' }, talk = { function(n) return n > 0 and n%2 == 1 end, 'talk' }, template = { 10, 'template' }, wikipedia = { 4, 'Wikipedia project' }, category = { 14, 'category' }, user = { 2, 'user' }, }

-- Don't convert blank category to nil local function valueFunc(key, val) if type(val) == 'string' then val = val:match('^%s*(.-)%s*$') if val == '' and key ~= 'category' then return nil end end return val end

local function getPrettyName(args) for k in namespaceCategories do if args[k .. ' category'] then return "" .. args.name .. ": " end end return "'''" .. args.name .. "''': " end

function p.core(frame, args) if not args then args = getArgs(frame, {wrappers = 'Template:Redirect template/core', valueFunc = valueFunc}) end local namespace = mw.title.getCurrentTitle.namespace local otherCategory = args.category or string.format('', args['other category']) local retval = string.format('*%sThis is a redirect%s%s. %s',		args.name and getPrettyName(args) or '',		args.from and (' from ' .. args.from) or '',		args.to and (' to ' .. args.to) or ,		args.info or 	) for k,v in namespaceCategories do if args[k .. ' category'] then if type(v[1]) == 'function' and v[1](namespace) or v[1] == namespace then retval = retval .. (args.category or string.format('', args[k .. ' category'])) elseif args['other category'] then retval = retval .. otherCategory else retval = retval .. frame:expandTemplate{title = 'Incorrect redirect template', args = {v[2]}} end end end return retval end

function p.main(frame) local args = getArgs(frame, {wrappers = 'Template:Redirect template', valueFunc = valueFunc}) local retval = p.core(frame, args) if mw.title.getCurrentTitle.namespace == 0 then if args.printworthy == 'yes' then return retval .. (args.category or '') elseif args.printworthy == 'no' then return retval .. (args.category or '') end end return retval end

return p