Diferencia entre revisiones de «Módulo:Navbar»

De WikiShia
Saltar a: navegación, buscar
(Página creada con «local p = {} local HtmlBuilder = require('Module:HtmlBuilder') function trim(s) return mw.ustring.match( s, "^%s*(.-)%s*$" ) end function error(s) local span = H...»)
 
 
(No se muestra una edición intermedia del mismo usuario)
Línea 1: Línea 1:
 
local p = {}
 
local p = {}
  
−
local HtmlBuilder = require('Module:HtmlBuilder')
+
local getArgs
  
−
function trim(s)
+
function p._navbar(args)
−
    return mw.ustring.match( s, "^%s*(.-)%s*$" )
+
local titleArg = 1
−
end
 
−
 
 
−
function error(s)
 
−
    local span = HtmlBuilder.create('span')
 
−
 
 
−
    span
 
−
        .addClass('error')
 
−
        .css('float', 'left')
 
−
        .css('white-space', 'nowrap')
 
−
        .wikitext('Error: ' .. s)
 
−
 
 
−
    return tostring(span)
 
−
end
 
−
 
 
−
function getTitle( pageName )
 
−
    pageName = trim( pageName );
 
−
    local page_title, talk_page_title;
 
−
 
 
−
    if mw.ustring.sub(pageName, 1, 1) == ':' then
 
−
        page_title = mw.title.new( mw.ustring.sub(pageName, 2) );
 
−
    else
 
−
        page_title = mw.title.new( pageName, 'Template' );
 
−
    end
 
−
 
 
−
    if page_title then
 
−
        talk_page_title = page_title.talkPageTitle;
 
−
    else
 
−
        talk_page_title = nil;
 
−
    end
 
−
 
 
−
    return page_title, talk_page_title;
 
−
end
 
  
−
function _navbar( args )
+
if args.collapsible then
−
    if not args[1] then
+
titleArg = 2
−
        return error('No name provided')
+
if not args.plain then
−
    end
+
args.mini = 1
 +
end
 +
if args.fontcolor then
 +
args.fontstyle = 'color:' .. args.fontcolor .. ';'
 +
end
 +
args.style = 'float:left; text-align:left; width:6em;'
 +
end
  
−
    local good, title, talk_title;
+
local titleText = args[titleArg] or (':' .. mw.getCurrentFrame():getParent():getTitle())
−
    good, title, talk_title = pcall( getTitle, args[1] );
+
local title = mw.title.new(mw.text.trim(titleText), 'Template');
−
    if not good then
 
−
        return error(title);
 
−
    end
 
  
−
    if not title then
+
if not title then
−
        return error('Page does not exist')
+
--error('Invalid title ' .. titleText) -- diferente a en la Wikipedia inglesa
−
    end
+
return
 +
end
  
−
    local mainpage = title.fullText;
+
local talkpage = title.talkPageTitle and title.talkPageTitle.fullText or '';
−
    local talkpage = talk_title and talk_title.fullText or ''
 
−
    local editurl = title:fullUrl( 'action=edit' );
 
  
−
    local viewLink, talkLink, editLink = 'view', 'talk', 'edit'
+
local div = mw.html.create():tag('div')
−
    if args.mini then
+
div
−
        viewLink, talkLink, editLink = 'v', 't', 'e'
+
:addClass('plainlinks')
−
    end
+
:addClass('hlist')
 +
:addClass('navbar')
 +
:cssText(args.style)
  
−
    local div = HtmlBuilder.create( 'div' )
+
if args.mini then div:addClass('mini') end
−
    div
 
−
        .addClass( 'plainlinks' )
 
−
        .addClass( 'hlist' )
 
−
        .addClass( 'navbar')
 
−
        .cssText( args.style )
 
  
−
    if args.mini then div.addClass('mini') end
+
if not (args.mini or args.plain) then
 +
div
 +
:tag('span')
 +
:css('word-spacing', 0)
 +
:cssText(args.fontstyle)
 +
:wikitext(args.text or 'Esta caja:')
 +
:wikitext(' ')
 +
end
  
−
    if not (args.mini or args.plain) then
+
if args.brackets then
−
        div
+
div
−
            .tag( 'span' )
+
:tag('span')
−
                .css( 'word-spacing', 0 )
+
:css('margin-right', '-0.125em')
−
                .cssText( args.fontstyle )
+
:cssText(args.fontstyle)
−
                .wikitext( args.text or 'This box:' )
+
:wikitext('[')
−
                .wikitext( ' ' )
+
:newline();
−
    end
+
end
  
−
    if args.brackets then
+
local ul = div:tag('ul');
−
        div
 
−
            .tag('span')
 
−
                .css('margin-right', '-0.125em')
 
−
                .cssText( args.fontstyle )
 
−
                .wikitext( '[' )
 
−
                .newline();
 
−
    end
 
  
−
    local ul = div.tag('ul');
+
ul
 +
:tag('li')
 +
:addClass('nv-view')
 +
:wikitext('[[' .. title.fullText .. '|')
 +
:tag(args.mini and 'abbr' or 'span')
 +
:attr('title', 'Ve esta plantilla')
 +
:cssText(args.fontstyle)
 +
:wikitext(args.mini and 'v' or 'ver')
 +
:done()
 +
:wikitext(']]')
 +
:done()
 +
:tag('li')
 +
:addClass('nv-talk')
 +
:wikitext('[[' .. talkpage .. '|')
 +
:tag(args.mini and 'abbr' or 'span')
 +
:attr('title', 'Discute esta plantilla')
 +
:cssText(args.fontstyle)
 +
:wikitext(args.mini and 'd' or 'discusión')
 +
:done()
 +
:wikitext(']]');
  
−
    ul
+
if not args.noedit then
−
        .tag( 'li' )
+
ul
−
            .addClass( 'nv-view' )
+
:tag('li')
−
            .wikitext( '[[' .. mainpage .. '|' )
+
:addClass('nv-edit')
−
            .tag( 'span ' )
+
:wikitext('[' .. title:fullUrl('action=edit') .. ' ')
−
                .attr( 'title', 'View this template' )
+
:tag(args.mini and 'abbr' or 'span')
−
                .cssText( args.fontstyle or '' )
+
:attr('title', 'Edita esta plantilla')
−
                .wikitext( viewLink )
+
:cssText(args.fontstyle)
−
                .done()
+
:wikitext(args.mini and 'e' or 'editar')
−
            .wikitext( ']]' )
+
:done()
−
            .done()
+
:wikitext(']');
−
        .tag( 'li' )
+
end
−
            .addClass( 'nv-talk' )
 
−
            .wikitext( '[[' .. talkpage .. '|' )
 
−
            .tag( 'span ' )
 
−
                .attr( 'title', 'Discuss this template' )
 
−
                .cssText( args.fontstyle or '' )
 
−
                .wikitext( talkLink )
 
−
                .done()
 
−
            .wikitext( ']]' );
 
  
−
    if not args.noedit then
+
if args.brackets then
−
        ul
+
div
−
            .tag( 'li' )
+
:tag('span')
−
                .addClass( 'nv-edit' )
+
:css('margin-left', '-0.125em')
−
                .wikitext( '[' .. editurl .. ' ' )
+
:cssText(args.fontstyle)
−
                .tag( 'span ' )
+
:wikitext(']')
−
                    .attr( 'title', 'Edit this template' )
+
:newline();
−
                    .cssText( args.fontstyle or '' )
+
end
−
                    .wikitext( editLink )
 
−
                    .done()
 
−
                .wikitext( ']' );
 
−
    end
 
  
−
    if args.brackets then
+
if args.collapsible then
−
        div
+
div
−
            .tag('span')
+
:done()
−
                .css('margin-left', '-0.125em')
+
:tag('span')
−
                .cssText( args.fontstyle or '' )
+
:css('font-size', '110%')
−
                .wikitext( ']' )
+
:cssText(args.fontstyle)
−
                .newline();
+
:wikitext(args[1])
−
    end
+
end
  
−
    return tostring(div)
+
return tostring(div:done())
 
end
 
end
  
 
function p.navbar(frame)
 
function p.navbar(frame)
−
    local origArgs
+
if not getArgs then
−
    -- If called via #invoke, use the args passed into the invoking template.
+
getArgs = require('Module:Arguments').getArgs
−
    -- Otherwise, for testing purposes, assume args are being passed directly in.
+
end
−
    if frame == mw.getCurrentFrame() then
+
return p._navbar(getArgs(frame))
−
        origArgs = frame:getParent().args
 
−
    else
 
−
        origArgs = frame
 
−
    end
 
−
 
 
−
    -- ParserFunctions considers the empty string to be false, so to preserve the previous
 
−
    -- behavior of {{navbar}}, change any empty arguments to nil, so Lua will consider
 
−
    -- them false too.
 
−
    args = {}
 
−
    for k, v in pairs(origArgs) do
 
−
        if v ~= '' then
 
−
            args[k] = v
 
−
        end
 
−
    end
 
−
 
 
−
    return _navbar(args)
 
 
end
 
end
  
 
return p
 
return p

Revisión actual del 08:34 23 may 2020

La documentación para este módulo puede ser creada en Módulo:Navbar/doc 

local p = {}

local getArgs

function p._navbar(args)
	local titleArg = 1

	if args.collapsible then
		titleArg = 2
		if not args.plain then
			args.mini = 1
		end
		if args.fontcolor then
			args.fontstyle = 'color:' .. args.fontcolor .. ';'
		end
		args.style = 'float:left; text-align:left; width:6em;'
	end

	local titleText = args[titleArg] or (':' .. mw.getCurrentFrame():getParent():getTitle())
	local title = mw.title.new(mw.text.trim(titleText), 'Template');

	if not title then
		--error('Invalid title ' .. titleText) -- diferente a en la Wikipedia inglesa
		return
	end

	local talkpage = title.talkPageTitle and title.talkPageTitle.fullText or '';

	local div = mw.html.create():tag('div')
	div
		:addClass('plainlinks')
		:addClass('hlist')
		:addClass('navbar')
		:cssText(args.style)

	if args.mini then div:addClass('mini') end

	if not (args.mini or args.plain) then
		div
			:tag('span')
				:css('word-spacing', 0)
				:cssText(args.fontstyle)
				:wikitext(args.text or 'Esta caja:')
				:wikitext(' ')
	end

	if args.brackets then
		div
			:tag('span')
				:css('margin-right', '-0.125em')
				:cssText(args.fontstyle)
				:wikitext('[')
				:newline();
	end

	local ul = div:tag('ul');

	ul
		:tag('li')
			:addClass('nv-view')
			:wikitext('[[' .. title.fullText .. '|')
			:tag(args.mini and 'abbr' or 'span')
				:attr('title', 'Ve esta plantilla')
				:cssText(args.fontstyle)
				:wikitext(args.mini and 'v' or 'ver')
				:done()
			:wikitext(']]')
			:done()
		:tag('li')
			:addClass('nv-talk')
			:wikitext('[[' .. talkpage .. '|')
			:tag(args.mini and 'abbr' or 'span')
				:attr('title', 'Discute esta plantilla')
				:cssText(args.fontstyle)
				:wikitext(args.mini and 'd' or 'discusión')
				:done()
			:wikitext(']]');

	if not args.noedit then
		ul
			:tag('li')
				:addClass('nv-edit')
				:wikitext('[' .. title:fullUrl('action=edit') .. ' ')
				:tag(args.mini and 'abbr' or 'span')
					:attr('title', 'Edita esta plantilla')
					:cssText(args.fontstyle)
					:wikitext(args.mini and 'e' or 'editar')
					:done()
				:wikitext(']');
	end

	if args.brackets then
		div
			:tag('span')
				:css('margin-left', '-0.125em')
				:cssText(args.fontstyle)
				:wikitext(']')
				:newline();
	end

	if args.collapsible then
		div
			:done()
		:tag('span')
			:css('font-size', '110%')
			:cssText(args.fontstyle)
			:wikitext(args[1])
	end

	return tostring(div:done())
end

function p.navbar(frame)
	if not getArgs then
		getArgs = require('Module:Arguments').getArgs
	end
	return p._navbar(getArgs(frame))
end

return p
Obtenido de «https://es.wikishia.net/index.php?title=Módulo:Navbar&oldid=19664»