Modul:Redirect hatnote: Unterschied zwischen den Versionen
Updated module from sandbox with support for multiple redirect arguments.
(check category-space hatnotes too) |
(Updated module from sandbox with support for multiple redirect arguments.) |
||
| Zeile 8: | Zeile 8: | ||
local libraryUtil = require('libraryUtil') | local libraryUtil = require('libraryUtil') | ||
local checkType = libraryUtil.checkType | local checkType = libraryUtil.checkType | ||
local checkTypeMulti = libraryUtil.checkTypeMulti | |||
local p = {} | local p = {} | ||
| Zeile 35: | Zeile 36: | ||
end | end | ||
-- Return an error if no redirect was specified. | --Get table of redirects | ||
local numRedirects = tonumber(frame.args[1]) or 1 | |||
local redirect = {} | |||
for i = 1, numRedirects do | |||
-- Return an error if no redirect was specified. | |||
if not args[i] then | |||
return mHatnote.makeWikitextError( | |||
'no redirect specified', | |||
'Template:Redirect#Errors', | |||
args.category | |||
) | |||
end | |||
redirect[i] = args[i] | |||
end | end | ||
-- Create the data table. | -- Create the data table. | ||
local data = {} | local data = {} | ||
local iArg = | local iArg = numRedirects - 1 | ||
local iData = 1 | local iData = 1 | ||
repeat | repeat | ||
| Zeile 94: | Zeile 101: | ||
local pages = useTable.pages or {} | local pages = useTable.pages or {} | ||
if isFirst then | if isFirst then | ||
redirect = redirect or error( | redirect = redirect[1] or error( | ||
'isFirst was set in formatUseTable, but no redirect was supplied', | 'isFirst was set in formatUseTable, but no redirect was supplied', | ||
2 | 2 | ||
| Zeile 114: | Zeile 121: | ||
-- Validate the input. Don't bother checking currentTitle, redirectTitle or | -- Validate the input. Don't bother checking currentTitle, redirectTitle or | ||
-- targetTitle, as they are only used in testing. | -- targetTitle, as they are only used in testing. | ||
checkTypeMulti('_redirect', 1, redirect, {'string', 'table'}) | |||
-- String type can stay valid until extant use-cases are checked-for and | |||
-- updated, but we'll coerce them to table for now | |||
if type(redirect) == 'string' then redirect = {redirect} end | |||
checkType('_redirect', 2, data, 'table', true) | checkType('_redirect', 2, data, 'table', true) | ||
checkType('_redirect', 3, options, 'table', true) | checkType('_redirect', 3, options, 'table', true) | ||
| Zeile 123: | Zeile 133: | ||
-- Generate the text. | -- Generate the text. | ||
local text = {} | local text = {} | ||
text[#text + 1] = ' | local formattedRedirect = {} | ||
for k,v in pairs(redirect) do | |||
formattedRedirect[k] = '"' .. v .. '"' | |||
end | |||
text[#text + 1] = mw.text.listToText(formattedRedirect) .. ' ' .. (#redirect == 1 and 'redirects' or 'redirect') .. ' here.' | |||
text[#text + 1] = formatUseTable(data[1] or {}, true, redirect) | text[#text + 1] = formatUseTable(data[1] or {}, true, redirect) | ||
if data[1] and data[1].use and data[1].use ~= 'other uses' then | if data[1] and data[1].use and data[1].use ~= 'other uses' then | ||
| Zeile 132: | Zeile 146: | ||
text = table.concat(text, ' ') | text = table.concat(text, ' ') | ||
local categoryTable = {} | |||
-- | --add categories to a table by index, so we don't get duplicates | ||
function addCategory(cat) | |||
if cat and cat ~= '' then | |||
categoryTable[string.format('[[Category:%s]]', cat)] = true | |||
end | end | ||
end | end | ||
local mhOptions = {} | local mhOptions = {} | ||
if currentTitle.namespace == 0 | for k,v in pairs(redirect) do | ||
and redirectTitle and redirectTitle.namespace ~= 0 | -- Generate the tracking category. | ||
-- We don't need a tracking category if the template invocation has been | |||
-- copied directly from the docs, or if we aren't in main- or category-space. | |||
if not v:find('^REDIRECT%d*$') and v ~= 'TERM' -- | |||
and currentTitle.namespace == 0 or currentTitle.namespace == 14 | |||
then | |||
redirectTitle = redirectTitle or getTitle(v) | |||
if not redirectTitle or not redirectTitle.exists then | |||
addCategory('Missing redirects') | |||
elseif not redirectTitle.isRedirect then | |||
addCategory('Articles with redirect hatnotes needing review') | |||
else | |||
local mRedirect = require('Module:Redirect') | |||
local target = mRedirect.getTarget(redirectTitle) | |||
targetTitle = targetTitle or target and getTitle(target) | |||
if targetTitle and targetTitle ~= currentTitle then | |||
addCategory('Articles with redirect hatnotes needing review') | |||
end | |||
end | |||
end | |||
-- Generate the options to pass to [[Module:Hatnote]]. | |||
if currentTitle.namespace == 0 and not mhOptions.selfref | |||
and redirectTitle and redirectTitle.namespace ~= 0 | |||
then | |||
-- We are on a mainspace page, and the hatnote starts with something | |||
-- like "Wikipedia:Foo redirects here", so automatically label it as | |||
-- a self-reference. | |||
mhOptions.selfref = true | |||
else | |||
mhOptions.selfref = options.selfref | |||
end | |||
end | |||
--concatenate all the categories | |||
local category = '' | |||
for k,v in pairs(categoryTable) do | |||
category = category .. k | |||
end | end | ||