Módulo:Citar lista de discussão

Documentação do módulo[ver] [editar] [histórico] [purgar]

Módulo de suporte de {{citar lista de discussão}}

Ver também

• {{Citar web}}

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