Wikipedia

Modul:Redirect hatnote: Perbedaan antara revisi

Jelajahi riwayat secara interaktif
← Revisi sebelumnyaRevisi selanjutnya →
Konten dihapus Konten ditambahkan
Tidak ada ringkasan suntingan
perbarui per https://en.wiki-indonesia.club/w/index.php?title=Module:Redirect_hatnote&oldid=726676462
Baris 5:
--]]
 
local mHatnote = require('ModulModule: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 = {}
Baris 21 ⟶ 24:
 
function p.redirect(frame)
mArguments = require('Module:Arguments')
-- Get the args table and work out the maximum arg key.
local args = mArguments.getArgs(frame, {parentOnly=true})
local origArgs = frame:getParent().args
--Get number of redirects
local args = {}
local numRedirects = tonumber(frame.args[1]) or 1
local maxArg = 0
-- Create the options table.
for k, v in pairs(origArgs) do
if type(k) == 'number' and k > maxArg then
maxArg = k
end
v = v:match('^%s*(.-)%s*$') -- Trim whitespace
if v ~= '' then
args[k] = v
end
end
 
-- Kembali mendapatkan kesalahan jika tidak ada pengalihan disebutkan.
local redirect = args[1]
if not redirect then
return mHatnote.makeWikitextError(
'tidak ada pengalihan disebutkan',
'Templat:Redirect#Galat',
args.category
)
end
 
-- Untuk membuat tabel data.
local data = {}
local iArg = 0
local iData = 1
repeat
iArg = iArg + 2
local useTable = data[iData] or {}
local pages = useTable.pages or {}
local use = args[iArg]
local page = args[iArg + 1]
local nextUse = args[iArg + 2]
pages[#pages + 1] = page
useTable.pages = pages
if use ~= 'dan' then
useTable.use = use
end
data[iData] = useTable
if nextUse ~= 'dan' then
iData = iData + 1
end
until iArg >= maxArg - 1
 
-- Membuat tabel opsi.
local options = {}
options.selfref = args.selfref
return p._redirect(args, numRedirects, options)
return p._redirect(redirect, data, options)
end
 
function p._redirect(args, numRedirects, options, currentTitle, redirectTitle, targetTitle)
local function formatUseTable(useTable, isFirst, redirect)
-- Validate the input. Don't bother checking currentTitle, redirectTitle or
-- Formats one use table. Use tables are the tables inside the data array.
-- targetTitle, as they are only used in testing.
-- Each one corresponds to one use. (A use might be the word "cats" in the
checkType('_redirect', 1, args, 'table')
-- phrase "For cats, see [[Felines]]".)
checkType('_redirect', 2, numRedirects, 'number', true)
-- Returns a string, or nil if no use was specified.
numRedirects = numRedirects or 1
-- The isFirst parameter is used to apply special formatting for the first
-- table in the data array. If isFirst is specified, the redirect parameter
useTable = useTable or {}
local use
if isFirst then
use = useTable.use or 'kegunaan lain'
elseif not useTable.use then
return nil
elseif tonumber(useTable.use) == 1 then
use = 'kegunaan lain'
else
use = useTable.use
end
local pages = useTable.pages or {}
if isFirst then
redirect = redirect or error(
'isFirst digunakan dalam formatUseTable, tapi tidak ada pengalihan disediakan',
2
)
pages[1] = pages[1] or redirect .. ' (disambiguasi)'
else
pages[1] = pages[1] or useTable.use .. ' (disambiguasi)'
end
pages = mHatnote.formatPages(unpack(pages))
pages = mw.text.listToText(pages)
return string.format(
'Untuk %s, lihat %s.',
use,
pages
)
end
 
function p._redirect(redirect, data, options, currentTitle, redirectTitle, targetTitle)
-- Validasi ''input''. Tidak perlu memeriksa currentTitle, redirectTitle atau
-- targetTitle, karena hanya digunakan untuk uji coba.
checkType('_redirect', 1, redirect, 'string')
checkType('_redirect', 2, data, 'table', true)
checkType('_redirect', 3, options, 'table', true)
data = data or {}
options = options or {}
currentTitle = currentTitle or mw.title.getCurrentTitle()
-- Get the table of redirects
 
local redirect = {}
-- Hasilkan tulisan.
for i = 1, numRedirects do
local text = {}
text[#text -- +Return 1]an =error '"'if ..a redirect .. '" beralih keparameter halamanis inimissing.'
if not args[i] then
text[#text + 1] = formatUseTable(data[1] or {}, true, redirect)
return mHatnote.makeWikitextError(
if data[1] and data[1].use and data[1].use ~= 'kegunaan lain' then
'missing redirect parameter',
for i = 2, #data do
'Template:Redirect#Errors',
text[#text + 1] = formatUseTable(data[i] or {}, false)
args.category
)
end
redirect[i] = args[i]
end
-- Generate the text.
local formattedRedirect = {}
for k,v in pairs(redirect) do
formattedRedirect[k] = '"' .. v .. '"'
end
local text = {
mHatList.andList(formattedRedirect) .. ' ' .. 'beralih' .. ' ke halaman ini.',
mHatList._forSee(args, #redirect + 1, {title = redirect[1]})
}
text = table.concat(text, ' ')
-- Functionality for adding categories
local categoryTable = {}
-- Generate the tracking category.
function addCategory(cat)
-- We don't need a tracking category if the template invocation has been
if cat and cat ~= '' then
-- copied directly from the docs, or if we aren't in mainspace.
-- Add by index to avoid duplicates
local category
categoryTable[string.format('[[Kategori:%s]]', cat)] = true
if not redirect:find('^REDIRECT%d*$') and redirect ~= 'TERM' --
end
and currentTitle.namespace == 0
end
then
--Generate tracking categories
redirectTitle = redirectTitle or getTitle(redirect)
local mhOptions = {}
if not redirectTitle or not redirectTitle.exists then
for k,v in pairs(redirect) do
category = 'Missing redirects'
-- We don't need a tracking category if the template invocation has been
elseif not redirectTitle.isRedirect then
-- copied directly from the docs, or if we aren't in main- or category-space.
category = 'Articles with redirect hatnotes needing review'
if not v:find('^REDIRECT%d*$') and v ~= 'TERM' --
else
and currentTitle.namespace == 0 or currentTitle.namespace == 14
local mRedirect = require('Modul:Redirect')
then
local target = mRedirect.getTarget(redirectTitle)
targetTitleredirectTitle = targetTitleredirectTitle or target and getTitle(targetv)
if targetTitlenot andredirectTitle targetTitleor ~=not currentTitleredirectTitle.exists then
addCategory('Missing redirects')
category = 'Articles with redirect hatnotes needing review'
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
category = category and string.format('[[Kategori:%s]]', category) or ''
local category = ''
 
for k,v in pairs(categoryTable) do
-- Hasilkan opsi untuk memberi perintah ke [[Modul:Hatnote]].
category = category .. k
local mhOptions = {}
if currentTitle.namespace == 0
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
 
Diperoleh dari "https://wiki-indonesia.club/wiki/Modul:Redirect_hatnote"