Módulo:Citar lista de discussão

A documentação para este módulo pode ser criada na página Módulo:Citar lista de discussão/doc

local l = require('Módulo:Citação/CS1')
--[[--------------------------< l . d i s c u s s a o >------------------------------------
Este é o método principal da predefinição {{citar lista de discussão}}.
]]
l.discussao = function(frame)
				frame.whitelist = {
								lista = true,
								['lista-correio'] = true,
								['lista-discussão'] = true,
								mailinglist = true,
								['mailing-list'] = true
				}
				local config, args, A = tratarArgumentos(frame)
				config.CitationClass = ''
				local classe = 'mailinglist'
				cfg.aliases.Periodical = {'lista', 'lista-correio', 'lista-discussão', 'mailinglist', 'mailing-list'}
				A.TitleType = set_titletype(classe, A.TitleType)
				if not is_set(A.URL) then
								table.insert(z.message_tail, { set_error('cite_web_url', {}, true)})
				end
				local TransTitle = A.TransTitle
				local Title = A.Title
				if is_set(A.TitleLink) and is_set(A.Title) then
								Title = "[[" .. A.TitleLink .. "|" .. Title .. "]]"
				end
				config.TituloFormatado = {}
				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
				-- Função com o código abstraído
				local B
				A, B = citation0( config, args, A)
				config.CitationClass = classe
				B.config = config
				return textoFinal(A, B)
end
return l