Módulo:Citar entrevista
DescriçãoEste módulo destina-se a proporcionar funções básicas da predefinição
local e = require('Módulo:Citação/CS1')
--[[--------------------------< r . e n t r e v i s t a >------------------------------------------------------
Este é o método principal da predefinição {{citar entrevista}}.
]]
e.entrevista = function(frame)
local config, args, A = tratarArgumentos(frame)
config.CitationClass = ''
config.usaVolume = true
config.usaIssue = true
local B
local classe = 'interview'
--[[
Program, Callsign, City depreciados, então evitar usar /Configuração para
reatribuição, que permitiria usar estes parâmetros fora da predefinição 'entrevista'
]]
if is_set(A.Program) then
if not is_set(A.Periodical) then
A.Periodical = A.Program
end
end
if is_set(A.Callsign) then
if not is_set(A.PublisherName) then
A.PublisherName = A.Callsign
end
end
if is_set(A.City) then
if not is_set(A.PublicationPlace) then
A.PublicationPlace = A.City
end
end
A.TitleType = set_titletype (classe, A.TitleType)
config.TituloFormatado = {}
do
local TransTitle = A.TransTitle
local Title = A.Title
if is_set(A.TitleLink) and is_set(A.Title) then
Title = "[[" .. A.TitleLink .. "|" .. Title .. "]]"
end
if (is_set(Title)) then
Title = kern_quotes (Title)
Title = wrap_style ('quoted-title', Title)
config.TituloFormatado.Title = Title
end
if (is_set(TransTitle)) then
TransTitle= wrap_style ('trans-quoted-title', TransTitle ) -- .. ", "
config.TituloFormatado.TransTitle = TransTitle
end
end
-- if is_set (A.Interviewers) then
-- local sepc = set_style (A.Mode:lower())
-- A.Others = is_set(A.Others) and (sepc .. ' ' .. A.Others) or ''
-- A.Others = wrap_msg ('interview', A.Interviewers, sepc == ',' ) .. A.Others
-- end
-- Função com o código abstraído
A, B = citation0( config, args, A)
config.CitationClass = classe
B.config = config
return textoFinal(A, B)
end
return e
|