Itaymbere: Criou página com '-- Isso implementa a Predefinição:Tlg local getArgs = require('Módulo:Arguments').getArgs local p = {} -- É uma string que não está vazia? local function _ne(s) return s ~= nil and s ~= "" end local nw = mw.text.nowiki local function addTemplate(s) local i, _ = s:find(':', 1, true) if i == nil then return 'Predefinição:' .. s end local ns = s:sub(1, i - 1) if ns == '' or mw.site.namespaces[ns] then return s else return 'Predefinição:' .. s end...'

2026-03-29T17:29:48Z

Criou página com '-- Isso implementa a Predefinição:Tlg local getArgs = require('Módulo:Arguments').getArgs local p = {} -- É uma string que não está vazia? local function _ne(s) return s ~= nil and s ~= "" end local nw = mw.text.nowiki local function addTemplate(s) local i, _ = s:find(':', 1, true) if i == nil then return 'Predefinição:' .. s end local ns = s:sub(1, i - 1) if ns == '' or mw.site.namespaces[ns] then return s else return 'Predefinição:' .. s end...'

Página nova

-- Isso implementa a Predefinição:Tlg
local getArgs = require('Módulo:Arguments').getArgs
local p = {}

-- É uma string que não está vazia?
local function _ne(s)
return s ~= nil and s ~= ""
end

local nw = mw.text.nowiki

local function addTemplate(s)
local i, _ = s:find(':', 1, true)
if i == nil then
return 'Predefinição:' .. s
end
local ns = s:sub(1, i - 1)
if ns == '' or mw.site.namespaces[ns] then
return s
else
return 'Predefinição:' .. s
end
end

local function trimTemplate(s)
local needle = 'predefinição:'
if s:sub(1, needle:len()):lower() == needle then
return s:sub(needle:len() + 1)
else
return s
end
end

local function linkTitle(args)
if _ne(args.nolink) then
if _ne(args.subst) then
return 'subst:' .. args['1']
else
return args['1']
end
end

local titleObj
local titlePart = '[['
if args['1'] then
-- Isso lida com :Page e outros NS
titleObj = mw.title.new(args['1'], 'Predefinição')
else
titleObj = mw.title.getCurrentTitle()
end

titlePart = titlePart .. (titleObj ~= nil and titleObj.fullText or
addTemplate(args['1']))

local textPart = args.alttext
if not _ne(textPart) then
if titleObj ~= nil then
textPart = titleObj:inNamespace("Predefinição") and args['1'] or titleObj.fullText
else
-- ligação vermelha
textPart = args['1']
end
end

if _ne(args.subst) then
-- hack: a coisa do ns acima provavelmente está quebrada
textPart = 'subst:' .. textPart
end

if _ne(args.brace) then
textPart = nw('{{') .. textPart .. nw('}}')
elseif _ne(args.braceinside) then
textPart = nw('{') .. textPart .. nw('}')
end

titlePart = titlePart .. '|' .. textPart .. ']]'
if _ne(args.braceinside) then
titlePart = nw('{') .. titlePart .. nw('}')
end
return titlePart
end

function p.main(frame)
local args = getArgs(frame, {
trim = true,
removeBlanks = false
})
return p._main(args)
end

function p._main(args)
local bold = _ne(args.bold) or _ne(args.boldlink) or _ne(args.boldname)
local italic = _ne(args.italic) or _ne(args.italics)
local dontBrace = _ne(args.brace) or _ne(args.braceinside)
local code = _ne(args.code) or _ne(args.tt)
local show_result = _ne(args._show_result)
local expand = _ne(args._expand)

-- Constrói a parte do link
local titlePart = linkTitle(args)
if bold then titlePart = "'''" .. titlePart .. "'''" end
if _ne(args.nowrapname) then titlePart = '' .. titlePart .. '' end

-- Constrói os argumentos
local textPart = ""
local textPartBuffer = "|"
local codeArguments = {}
local codeArgumentsString = ""
local i = 2
local j = 1
while args[i] do
local val = args[i]
if val ~= "" then
if _ne(args.nowiki) then
-- Remove as marcações nowiki primeiro porque chamar nw em algo que já contém marcações nowiki irá
-- desmontar o marcador de faixa nowiki e resultará na exibição literal de UNIQ...QINU
val = nw(mw.text.unstripNoWiki(val))
end
local k, v = string.match(val, "(.*)=(.*)")
if not k then
codeArguments[j] = val
j = j + 1
else
codeArguments[k] = v
end
codeArgumentsString = codeArgumentsString .. textPartBuffer .. val
if italic then
val = '' .. val .. ''
end
textPart = textPart .. textPartBuffer .. val
end
i = i + 1
end

-- envoltório final
local ret = titlePart .. textPart
if not dontBrace then ret = nw('{{') .. ret .. nw('}}') end
if _ne(args.a) then ret = nw('*') .. ' ' .. ret end
if _ne(args.kbd) then ret = '<kbd>' .. ret .. '</kbd>' end
if code then
ret = '<code>' .. ret .. '</code>'
elseif _ne(args.plaincode) then
ret = '<code style="border:none;background:transparent;color:inherit">' .. ret .. '</code>'
end
if _ne(args.nowrap) then ret = '' .. ret .. '' end

--[[ Embrulhar como 'HTML'?
local span = mw.html.create('span')
span:wikitext(ret)
--]]
if _ne(args.debug) then ret = ret .. '\n<pre>' .. mw.text.encode(mw.dumpObject(args)) .. '</pre>' end

if show_result then
local result = mw.getCurrentFrame():expandTemplate{title = addTemplate(args[1]), args = codeArguments}
ret = ret .. " → " .. result
end

if expand then
local query = mw.text.encode('{{' .. addTemplate(args[1]) .. string.gsub(codeArgumentsString, textPartBuffer, "|") .. '}}')
local url = mw.uri.fullUrl('special:ExpandTemplates', 'wpInput=' .. query)
mw.log()
ret = ret .. " [" .. tostring(url) .. "]"
end

return ret
end

return p

Módulo:Link de predefinição em geral - Histórico de revisão