11.314
suntingan
Modul:Redirect hatnote: Perbedaan antara revisi
←Membuat halaman berisi '--[[ -- This module produces a "redirect" hatnote. It looks like this: -- '"X" redirects here. For other uses, see Y.' -- It implements the {{redirect}} template. --]] local mHatnote = require('Module:Hatnote') local mHatList = require('Module:Hatnote list') local mArguments --lazily initialize local libraryUtil = require('libraryUtil') local checkType = libraryUtil.checkType local checkTypeMulti = libraryUtil.checkTypeMulti local p = {} local function getTitl...'
dw>Nihiltres (Updated from sandbox: Migrated p._quote to Module:Hatnote) |
(←Membuat halaman berisi '--[[ -- This module produces a "redirect" hatnote. It looks like this: -- '"X" redirects here. For other uses, see Y.' -- It implements the {{redirect}} template. --]] local mHatnote = require('Module:Hatnote') local mHatList = require('Module:Hatnote list') local mArguments --lazily initialize local libraryUtil = require('libraryUtil') local checkType = libraryUtil.checkType local checkTypeMulti = libraryUtil.checkTypeMulti local p = {} local function getTitl...') |
||
| Baris 13: | Baris 13: | ||
local p = {} | local p = {} | ||
local function getTitle(...) | local function getTitle(...) | ||
local success, titleObj = pcall(mw.title.new, ...) | local success, titleObj = pcall(mw.title.new, ...) | ||
return | if success then | ||
return titleObj | |||
else | |||
return nil | |||
end | |||
end | end | ||
function p.redirect(frame) | function p.redirect(frame) | ||
| Baris 64: | Baris 59: | ||
local formattedRedirect = {} | local formattedRedirect = {} | ||
for k,v in pairs(redirect) do | for k,v in pairs(redirect) do | ||
formattedRedirect[k] = | formattedRedirect[k] = '"' .. v .. '"' | ||
end | end | ||
local text = { | local text = { | ||
mHatList.andList(formattedRedirect) .. ' ' .. (#redirect == 1 and ' | mHatList.andList(formattedRedirect) .. ' ' .. (#redirect == 1 and 'beralih' or 'dialihkan') .. ' ke halaman ini.', | ||
mHatList._forSee(args, #redirect + 1, {title = redirect[1], extratext = args.text}) | mHatList._forSee(args, #redirect + 1, {title = redirect[1], extratext = args.text}) | ||
} | } | ||
| Baris 73: | Baris 68: | ||
-- Functionality for adding categories | -- Functionality for adding categories | ||
local categoryTable = {} | local categoryTable = {} | ||
function addCategory(cat) | |||
if cat and cat ~= '' then | if cat and cat ~= '' then | ||
-- Add by index to avoid duplicates | -- Add by index to avoid duplicates | ||
categoryTable[string.format('[[ | categoryTable[string.format('[[Kategori:%s]]', cat)] = true | ||
end | end | ||
end | end | ||
--Generate tracking categories | --Generate tracking categories | ||
local mhOptions = {} | local mhOptions = {} | ||
for k,v in pairs(redirect) do | for k,v in pairs(redirect) do | ||
-- We don't need a tracking category if the template invocation has been | -- We don't need a tracking category if the template invocation has been | ||
| Baris 88: | Baris 82: | ||
and currentTitle.namespace == 0 or currentTitle.namespace == 14 | and currentTitle.namespace == 0 or currentTitle.namespace == 14 | ||
then | then | ||
redirectTitle = redirectTitle or getTitle(v) | |||
if not | if not redirectTitle or not redirectTitle.exists then | ||
addCategory('Missing redirects') | addCategory('Missing redirects') | ||
elseif not | elseif not redirectTitle.isRedirect then | ||
addCategory('Articles with redirect hatnotes needing review') | |||
else | else | ||
local target = targetTitle or | local mRedirect = require('Module:Redirect') | ||
if | 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') | addCategory('Articles with redirect hatnotes needing review') | ||
end | end | ||
| Baris 107: | Baris 99: | ||
-- Generate the options to pass to [[Module:Hatnote]]. | -- Generate the options to pass to [[Module:Hatnote]]. | ||
if currentTitle.namespace == 0 and not mhOptions.selfref | if currentTitle.namespace == 0 and not mhOptions.selfref | ||
and | and redirectTitle and redirectTitle.namespace ~= 0 | ||
then | then | ||
-- We are on a mainspace page, and the hatnote starts with something | -- We are on a mainspace page, and the hatnote starts with something | ||