Difference between revisions of "Module:Navbar/sandbox"

From blackwiki
Jump to navigation Jump to search
test>Galobtter
(tweak, fix use of _navbar)
test>Galobtter
(restructure)
Line 2: Line 2:
  
 
local getArgs
 
local getArgs
 +
local args
 +
local ul
 +
local div
 +
 +
local function addItem (mini, full, link, descrip, args, url)
 +
local l
 +
if url then
 +
l = {'[', '', ']'}
 +
else
 +
l = {'[[', '|', ']]'}
 +
end
 +
ul:tag('li')
 +
:addClass('nv-'..full)
 +
:wikitext(l[1] .. link .. l[2])
 +
:tag(args.mini and 'abbr' or 'span')
 +
:attr('title', descrip..' this template')
 +
:cssText(args.fontstyle)
 +
:wikitext(args.mini and mini or full)
 +
:done()
 +
:wikitext(l[3])
 +
end
 +
 +
local function brackets (position, c, args)
 +
if args.brackets then
 +
div
 +
:tag('span')
 +
:css('margin-'..position, '-0.125em')
 +
:cssText(args.fontstyle)
 +
:wikitext(c)
 +
end
 +
end
  
 
function p._navbar(args)
 
function p._navbar(args)
 
local show = {true, true, true, false, false, false}
 
local show = {true, true, true, false, false, false}
 
local titleArg = 1
 
local titleArg = 1
 +
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)
 +
end
 +
local talkpage = title.talkPageTitle and title.talkPageTitle.fullText or ''
 
 
 
if args.collapsible then
 
if args.collapsible then
 
titleArg = 2
 
titleArg = 2
if not args.plain then
+
if not args.plain then args.mini = 1 end
args.mini = 1
 
end
 
 
if args.fontcolor then
 
if args.fontcolor then
 
args.fontstyle = 'color:' .. args.fontcolor .. ';'
 
args.fontstyle = 'color:' .. args.fontcolor .. ';'
Line 24: Line 59:
 
for k,v in ipairs(require ('Module:TableTools').compressSparseArray(args)) do
 
for k,v in ipairs(require ('Module:TableTools').compressSparseArray(args)) do
 
num = index[v]
 
num = index[v]
if num then
+
if num then show[num] = true end
show[num] = true
 
end
 
 
end
 
end
 
end
 
end
+
if args.noedit then
+
if args.noedit then show[3] = false end
show[3] = false
 
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)
 
end
 
 
 
local talkpage = title.talkPageTitle and title.talkPageTitle.fullText or '';
 
  
local div = mw.html.create():tag('div')
+
div = mw.html.create():tag('div')
 
div
 
div
 
:addClass('plainlinks')
 
:addClass('plainlinks')
Line 60: Line 82:
 
:wikitext(' ')
 
:wikitext(' ')
 
end
 
end
 
if args.brackets then
 
div
 
:tag('span')
 
:css('margin-right', '-0.125em')
 
:cssText(args.fontstyle)
 
:wikitext('[ ')
 
end
 
 
local ul = div:tag('ul')
 
 
 
local function addItem (mini, full, link, descrip, url)
+
brackets('right', '[ ', args)
local l
 
if url then
 
l = {'[', '', ']'}
 
else
 
l = {'[[', '|', ']]'}
 
end
 
ul:tag('li')
 
:addClass('nv-'..full)
 
:wikitext(l[1] .. link .. l[2])
 
:tag(args.mini and 'abbr' or 'span')
 
:attr('title', descrip..' this template')
 
:cssText(args.fontstyle)
 
:wikitext(args.mini and mini or full)
 
:done()
 
:wikitext(l[3])
 
end
 
 
 
if show[1] then addItem('v', 'view', title.fullText, 'View') end
+
ul = div:tag('ul')
if show[2] then addItem('t', 'talk', talkpage, 'Discuss') end
+
if show[1] then addItem('v', 'view', title.fullText, 'View', args) end
if show[3] then addItem('e', 'edit', title:fullUrl('action=edit'), 'Edit', true) end
+
if show[2] then addItem('t', 'talk', talkpage, 'Discuss', args) end
if show[4] then addItem('h', 'hist', title:fullUrl('action=history'), 'History of', true) end
+
if show[3] then addItem('e', 'edit', title:fullUrl('action=edit'), 'Edit', args, true) end
 +
if show[4] then addItem('h', 'hist', title:fullUrl('action=history'), 'History of', args, true) end
 
if show[5] then
 
if show[5] then
 
local move = mw.title.new ('Special:Movepage')
 
local move = mw.title.new ('Special:Movepage')
addItem('m', 'move', move:fullUrl('target='..title.fullText), 'Move', true) end
+
addItem('m', 'move', move:fullUrl('target='..title.fullText), 'Move', args, true) end
if show[6] then addItem('w', 'watch', title:fullUrl('action=watch'), 'Watch', true) end
+
if show[6] then addItem('w', 'watch', title:fullUrl('action=watch'), 'Watch', args, true) end
 +
 +
brackets('left', ' ]', args)
 
 
if args.brackets then
 
div
 
:tag('span')
 
:css('margin-left', '-0.125em')
 
:cssText(args.fontstyle)
 
:wikitext(' ]')
 
end
 
 
 
if args.collapsible then
 
if args.collapsible then
 
div
 
div
Line 123: Line 114:
 
getArgs = require('Module:Arguments').getArgs
 
getArgs = require('Module:Arguments').getArgs
 
end
 
end
return p._navbar(getArgs(frame))
+
return p._navbar(args, getArgs(frame))
 
end
 
end
  
 
return p
 
return p

Revision as of 20:23, 1 April 2018

Documentation for this module may be created at Module:Navbar/sandbox/doc

local p = {}

local getArgs
local args
local ul
local div

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

local function brackets (position, c, args)
	if args.brackets then
		div
			:tag('span')
				:css('margin-'..position, '-0.125em')
				:cssText(args.fontstyle)
				:wikitext(c)
	end
end

function p._navbar(args)
	local show = {true, true, true, false, false, false}
	local titleArg = 1
	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)
	end
	local talkpage = title.talkPageTitle and title.talkPageTitle.fullText or ''
	
	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'
	end
	
	if args.template then
		titleArg = 'template'
		show = {true, false, false, false, false, false}
		local index = {t = 2, d = 2, e = 3, h = 4, m = 5, w = 6, talk = 2, edit = 3, hist = 4, move = 5, watch = 6}
		for k,v in ipairs(require ('Module:TableTools').compressSparseArray(args)) do
			num = index[v]
			if num then show[num] = true end
		end
	end
	
	if args.noedit then show[3] = false end

	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 'This box:')
				:wikitext(' ')
	end
	
	brackets('right', '[ ', args)
	
	ul = div:tag('ul')
	if show[1] then addItem('v', 'view', title.fullText, 'View', args) end
	if show[2] then addItem('t', 'talk', talkpage, 'Discuss', args) end
	if show[3] then addItem('e', 'edit', title:fullUrl('action=edit'), 'Edit', args, true) end
	if show[4] then addItem('h', 'hist', title:fullUrl('action=history'), 'History of', args, true) end
	if show[5] then
		local move = mw.title.new ('Special:Movepage')
		addItem('m', 'move', move:fullUrl('target='..title.fullText), 'Move', args, true) end
	if show[6] then addItem('w', 'watch', title:fullUrl('action=watch'), 'Watch', args, true) end
	
	brackets('left', ' ]', args)
	
	if args.collapsible then
		div
			:done()
		:tag('div')
			:css('font-size', '114%')
			:css('margin', args.mini and '0 4em' or '0 7em')
			: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(args, getArgs(frame))
end

return p