Module:Navbar

Documentation for this module may be created atModule:Navbar/doc

localp={}

localgetArgs
localul

functionp.addItem(mini,full,link,descrip,args,url)
locall
ifurlthen
l={'[','',']'}
else
l={'[[','|',']]'}
end
ul:tag('li')
:addClass('nv-'..full)
:wikitext(l[1]..link..l[2])
:tag(args.miniand'abbr'or'span')
:attr('title',descrip..' this template')
:cssText(args.fontstyle)
:wikitext(args.miniandminiorfull)
:done()
:wikitext(l[3])
end

functionp.brackets(position,c,args,div)
ifargs.bracketsthen
div
:tag('span')
:css('margin-'..position,'-0.125em')
:cssText(args.fontstyle)
:wikitext(c)
end
end

functionp._navbar(args)
localshow={true,true,true,false,false,false}
localtitleArg=1

ifargs.collapsiblethen
titleArg=2
ifnotargs.plainthenargs.mini=1end
ifargs.fontcolorthen
args.fontstyle='color:'..args.fontcolor..';'
end
args.style='float:left; text-align:left'
end

ifargs.templatethen
titleArg='template'
show={true,false,false,false,false,false}
localindex={t=2,d=2,e=3,h=4,m=5,w=6,talk=2,edit=3,hist=4,move=5,watch=6}
fork,vinipairs(require('Module:TableTools').compressSparseArray(args))do
localnum=index[v]
ifnumthenshow[num]=trueend
end
end

ifargs.noeditthenshow[3]=falseend

localtitleText=args[titleArg]or(':'..mw.getCurrentFrame():getParent():getTitle())
localtitle=mw.title.new(mw.text.trim(titleText),'Template')
ifnottitlethen
error('Invalid title '..titleText)
end
localtalkpage=title.talkPageTitleandtitle.talkPageTitle.fullTextor''

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

ifargs.minithendiv:addClass('mini')end

ifnot(args.miniorargs.plain)then
div
:tag('span')
:css('word-spacing',0)
:cssText(args.fontstyle)
:wikitext(args.textor'This box:')
:wikitext(' ')
end

p.brackets('right','[ ',args,div)

ul=div:tag('ul')
ifshow[1]thenp.addItem('v','view',title.fullText,'View',args)end
ifshow[2]thenp.addItem('t','talk',talkpage,'Discuss',args)end
ifshow[3]thenp.addItem('e','edit',title:fullUrl('action=edit'),'Edit',args,true)end
ifshow[4]thenp.addItem('h','hist',title:fullUrl('action=history'),'History of',args,true)end
ifshow[5]then
localmove=mw.title.new('Special:Movepage')
p.addItem('m','move',move:fullUrl('target='..title.fullText),'Move',args,true)end
ifshow[6]thenp.addItem('w','watch',title:fullUrl('action=watch'),'Watch',args,true)end

p.brackets('left',' ]',args,div)

ifargs.collapsiblethen
div
:done()
:tag('div')
:css('font-size','114%')
:css('margin',args.miniand'0 4em'or'0 7em')
:cssText(args.fontstyle)
:wikitext(args[1])
end

returntostring(div:done())
end

functionp.navbar(frame)
ifnotgetArgsthen
getArgs=require('Module:Arguments').getArgs
end
returnp._navbar(getArgs(frame))
end

returnp