Module:Tfd links: Difference between revisions
From Zoophilia Wiki
Jump to navigationJump to search
meta>Frietjes No edit summary |
meta>Frietjes No edit summary |
||
Line 10: | Line 10: | ||
end | end | ||
local function | local function fullurllink(t, a, s) | ||
return '//en.wikipedia.org/w/index.php?title=' .. t .. '&' .. a | return '[//en.wikipedia.org/w/index.php?title=' .. t .. '&' .. a .. ' ' .. s .. ']' | ||
end | end | ||
function p.main(frame) | function p.main(frame) | ||
local args = frame:getParent().args | local args = frame:getParent().args | ||
local ns = (args['catfd'] and args['catfd'] ~= '') and 'Category' or 'Template' | local ns = (args['catfd'] and args['catfd'] ~= '') | ||
and 'Category' or 'Template' | |||
local tname = mw.getContentLanguage():ucfirst(args['1'] or 'Example') | local tname = mw.getContentLanguage():ucfirst(args['1'] or 'Example') | ||
local fname = ns .. ':' .. tname | local fname = ns .. ':' .. tname | ||
Line 30: | Line 31: | ||
if ymd ~= '' then | if ymd ~= '' then | ||
local dmy = frame:expandTemplate{ title = 'date', args = { | local dmy = frame:expandTemplate{ title='date', args={ymd, 'dmy'} } | ||
res = res .. '[[' .. fullpagename .. '#' .. fname .. '|' .. dmy .. ') (' | res = res .. '[[' .. fullpagename .. '#' .. fname .. '|' .. dmy .. ') (' | ||
end | end | ||
res = res .. | res = res .. fullurllink(fname, 'action=edit', 'edit') .. sep | ||
res = res .. '[[' .. ns .. ' talk:' .. tname .. '|talk]]' .. sep | res = res .. '[[' .. ns .. ' talk:' .. tname .. '|talk]]' .. sep | ||
res = res .. | res = res .. fullurllink(fname, 'action=history', 'history') .. sep | ||
if ns ~= 'Category' then | if ns ~= 'Category' then | ||
res = res .. | res = res .. fullurllink('Special:Whatlinkshere/' | ||
.. fname, 'limit=999', 'links') .. sep | |||
end | end | ||
res = res .. | res = res .. fullurllink('Special:Log', 'page=' | ||
.. urlencode(fname), 'logs') .. sep | |||
res = res .. '[[Special:PrefixIndex/' .. fname .. '|subpages]]' .. sep | res = res .. '[[Special:PrefixIndex/' .. fname .. '|subpages]]' .. sep | ||
res = res .. | res = res .. fullurlink(fname, 'action=delete&wpReason=' | ||
.. urlencode('[[' .. fullpagename .. '#' .. fname .. ']]'), 'delete') | |||
res = res .. ')</span>' | res = res .. ')</span>' | ||
Revision as of 14:36, 22 December 2016
Documentation for this module may be created at Module:Tfd links/doc
-- This module implements [[Template:Tfd links]]
local p = {}
local function urlencode(text)
-- Return equivalent of {{urlencode:text}}.
local function byte(char)
return string.format('%%%02X', string.byte(char))
end
return text:gsub('[^ %w%-._]', byte):gsub(' ', '+')
end
local function fullurllink(t, a, s)
return '[//en.wikipedia.org/w/index.php?title=' .. t .. '&' .. a .. ' ' .. s .. ']'
end
function p.main(frame)
local args = frame:getParent().args
local ns = (args['catfd'] and args['catfd'] ~= '')
and 'Category' or 'Template'
local tname = mw.getContentLanguage():ucfirst(args['1'] or 'Example')
local fname = ns .. ':' .. tname
local ymd = args['2'] or ''
local fullpagename = (ymd ~= '')
and 'WP:Templates for discussion/Log' .. ymd
or frame:preprocess('{{FULLPAGENAME}}')
local sep = ' <b>·</b> '
local res = '<span id="' .. ns .. ':' .. tname
.. '" class="plainlinks nourlexpansion 1x">'
.. '[[:' .. ns .. ':' .. tname .. ']] ('
if ymd ~= '' then
local dmy = frame:expandTemplate{ title='date', args={ymd, 'dmy'} }
res = res .. '[[' .. fullpagename .. '#' .. fname .. '|' .. dmy .. ') ('
end
res = res .. fullurllink(fname, 'action=edit', 'edit') .. sep
res = res .. '[[' .. ns .. ' talk:' .. tname .. '|talk]]' .. sep
res = res .. fullurllink(fname, 'action=history', 'history') .. sep
if ns ~= 'Category' then
res = res .. fullurllink('Special:Whatlinkshere/'
.. fname, 'limit=999', 'links') .. sep
end
res = res .. fullurllink('Special:Log', 'page='
.. urlencode(fname), 'logs') .. sep
res = res .. '[[Special:PrefixIndex/' .. fname .. '|subpages]]' .. sep
res = res .. fullurlink(fname, 'action=delete&wpReason='
.. urlencode('[[' .. fullpagename .. '#' .. fname .. ']]'), 'delete')
res = res .. ')</span>'
return res
end
return p