11.314
suntingan
Modul:Redirect: Perbedaan antara revisi
k
1 revisi diimpor
dw>Johnuniq (restore p.getTargetFromText which is used by Module:RfD which is causing "Lua error in Module:RfD at line 87: attempt to call upvalue 'getTargetFromText' (a nil value)") |
k (1 revisi diimpor) |
||
| (2 revisi perantara oleh pengguna yang sama tidak ditampilkan) | |||
| Baris 1: | Baris 1: | ||
-- This module provides functions for getting the target of a redirect page. | -- This module provides functions for getting the target of a redirect page. | ||
| Baris 17: | Baris 19: | ||
-- redirect. | -- redirect. | ||
function p.getTargetFromText(text) | function p.getTargetFromText(text) | ||
return string.match( | |||
text, | text, | ||
"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)%]%]" | "^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)%]%]" | ||
| Baris 23: | Baris 25: | ||
text, | text, | ||
"^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)|[^%[%]]-%]%]" | "^%s*#[Rr][Ee][Dd][Ii][Rr][Ee][Cc][Tt]%s*:?%s*%[%[([^%[%]|]-)|[^%[%]]-%]%]" | ||
) or string.match( | |||
text, | |||
"^%s*#[Aa][Ll][Ii][Hh]%s*:?%s*%[%[([^%[%]|]-)%]%]" | |||
) | ) | ||
end | end | ||
-- Gets the target of a redirect. If the page specified is not a redirect, | -- Gets the target of a redirect. If the page specified is not a redirect, | ||
-- returns nil. | -- returns nil. | ||
function p.getTarget(page | function p.getTarget(page) | ||
-- Get the title object. Both page names and title objects are allowed | -- Get the title object. Both page names and title objects are allowed | ||
-- as input. | -- as input. | ||
| Baris 44: | Baris 48: | ||
), 2) | ), 2) | ||
end | end | ||
if not titleObj then | if not titleObj or not titleObj.isRedirect then | ||
return nil | return nil | ||
end | end | ||
local | |||
if targetTitle | -- Find the target by using string matching on the page content. | ||
if | local target = p.getTargetFromText(titleObj:getContent() or "") | ||
return targetTitle. | if target then | ||
local targetTitle = getTitle(target) | |||
if targetTitle then | |||
return targetTitle.prefixedText | |||
else | else | ||
return | return nil | ||
end | end | ||
else | else | ||
-- The page is a redirect, but matching failed. This indicates a bug in | |||
-- the redirect matching pattern, so throw an error. | |||
error(string.format( | |||
'tidak bisa mengurai pengalihan pada halaman "%s"', | |||
titleObj.prefixedText | |||
)) | |||
end | end | ||
end | end | ||
| Baris 63: | Baris 75: | ||
-- target page name, or the passed page name when not a redirect. The passed | -- target page name, or the passed page name when not a redirect. The passed | ||
-- page name can be given as plain text or as a page link. | -- page name can be given as plain text or as a page link. | ||
-- | -- | ||
-- Returns page name as plain text, or when the bracket parameter is given, as a | -- Returns page name as plain text, or when the bracket parameter is given, as a | ||
-- page link. Returns an error message when page does not exist or the redirect | -- page link. Returns an error message when page does not exist or the redirect | ||
-- target cannot be determined for some reason. | -- target cannot be determined for some reason. | ||
--]] | --]] | ||
function p.luaMain(rname, bracket | function p.luaMain(rname, bracket) | ||
if type(rname) ~= "string" or not rname:find("%S") then | if type(rname) ~= "string" or not rname:find("%S") then | ||
return nil | return nil | ||
| Baris 74: | Baris 86: | ||
bracket = bracket and "[[%s]]" or "%s" | bracket = bracket and "[[%s]]" or "%s" | ||
rname = rname:match("%[%[(.+)%]%]") or rname | rname = rname:match("%[%[(.+)%]%]") or rname | ||
local target = p.getTarget(rname | local target = p.getTarget(rname) | ||
local ret = target or rname | local ret = target or rname | ||
ret = getTitle(ret) | ret = getTitle(ret) | ||
if ret then | if ret then | ||
ret = ret.prefixedText | |||
return bracket:format(ret) | return bracket:format(ret) | ||
else | else | ||
| Baris 91: | Baris 99: | ||
-- Provides access to the luaMain function from wikitext. | -- Provides access to the luaMain function from wikitext. | ||
function p.main(frame) | function p.main(frame) | ||
local args = require(' | local args = require('Modul:Arguments').getArgs(frame, {frameOnly = true}) | ||
return p.luaMain(args[1], args.bracket | return p.luaMain(args[1], args.bracket) or '' | ||
end | end | ||
| Baris 111: | Baris 119: | ||
-- if the specified page is a redirect, and the blank string otherwise. | -- if the specified page is a redirect, and the blank string otherwise. | ||
function p.isRedirect(frame) | function p.isRedirect(frame) | ||
local args = require(' | local args = require('Modul:Arguments').getArgs(frame, {frameOnly = true}) | ||
if p.luaIsRedirect(args[1]) then | if p.luaIsRedirect(args[1]) then | ||
return ' | return 'ya' | ||
else | else | ||
return '' | return '' | ||