Module:Navbar

Þessi skrifta inniheldur kóðann á bak við {{navbar}} sniðið. Vinsamlegast líttu á síðu sniðsins fyrir leiðbeiningar.

---

local p = {}


function trim(s)
    return mw.ustring.match( s, "^%s*(.-)%s*$" )
end

function error(s)
    local span = mw.html.create('span')

    span
        :addClass('error')
        :css('float', 'left')
        :css('white-space', 'nowrap')
        :wikitext('Villa: ' .. 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.ustring.sub(pageName, 2);
    else
        page_title = mw.site.namespaces[10].name .. ":" .. pageName
    end    
    
    talk_page_title = mw.site.namespaces[11].name .. ":" .. pageName
    
    return page_title, talk_page_title;    
end

function _navbar( args )
    if not args[1] then
        return error('Ekkert nafn gefið')
    end
 
    local title, talk_title;
    title, talk_title = getTitle(args[1])

    if not title then
        return error('Síðan er ekki til')
    end
 
    local mainpage = title
    local talkpage = talk_title or ''
    local editurl = tostring(mw.uri.fullUrl( title, 'action=edit' ))
 
    local viewLink, talkLink, editLink = 'skoða', 'ræða', 'breyta'
    if args.mini then
        viewLink, talkLink, editLink = 's', 'r', 'b'
    end
 
    local div = mw.html.create( 'div' )
    div
        :addClass( 'noprint' )
        :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 'Þessi tafla:' )
                :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( '[[' .. mainpage .. '|' )
            :tag( 'span' )
                :attr( 'title', 'Skoða þetta snið' )
                :cssText( args.fontstyle or '' )
                :wikitext( viewLink )
                :done()
            :wikitext( ']]' )
            :done()
        :tag( 'li' )
            :addClass( 'nv-talk' )
            :wikitext( '[[' .. talkpage .. '|' )
            :tag( 'span' )
                :attr( 'title', 'Ræða þetta snið' )
                :cssText( args.fontstyle or '' )
                :wikitext( talkLink )
                :done()
            :wikitext( ']]' );
 
    if not args.noedit then 
        ul
            :tag( 'li' )
                :addClass( 'nv-edit' )
                :wikitext( '[' .. editurl .. ' ' )
                :tag( 'span' )
                    :attr( 'title', 'Breyta þessu sniði' )
                    :cssText( args.fontstyle or '' )
                    :wikitext( editLink )
                    :done()
                :wikitext( ']' );
    end
 
    if args.brackets then
        div
            :tag('span')
                :css('margin-left', '-0.125em')
                :cssText( args.fontstyle or '' )
                :wikitext( ']' )
                :newline();
    end
 
    return tostring(div)
end

function p.navbar(frame)
    local origArgs
    -- If called via #invoke, use the args passed into the invoking template.
    -- Otherwise, for testing purposes, assume args are being passed directly in.
    if frame == mw.getCurrentFrame() then
        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
 
return p