模块:Navbar

星臣讨论 | 贡献2017年1月16日 (一) 03:29的版本 (创建页面,内容为“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...”)
(差异) ←上一版本 | 最后版本 (差异) | 下一版本→ (差异)

此模块的文档可以在模块: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('页面不存在 ' .. titleText)
	end

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

	local div = mw.html.create():tag('div')
	div
		:addClass('plainlinks')
		: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 '本模板:')
				:wikitext(' ')
	end

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

	div
			:wikitext('[[' .. title.fullText .. '|')
			:tag('span')
				:attr('title', '-{zh-hans:查看;zh-hant:檢視;}-该模板')
				:cssText(args.fontstyle)
				:wikitext(args.mini and '-{zh-hans:查;zh-hant:閱;}-' or '-{zh-hans:查看;zh-hant:檢視;}-')
				:done()
			:wikitext(']]')
			:tag('span')
				:cssText('font-weight:bold;')
				:wikitext(' · ')
				:done()
			:wikitext('[[' .. talkpage .. '|')
			:tag('span')
				:attr('title', '讨论该模板')
				:cssText(args.fontstyle)
				:wikitext(args.mini and '论' or '讨论')
				:done()
			:wikitext(']]');

	if not args.noedit then
		div
				:tag('span')
					:cssText('font-weight:bold;')
					:wikitext(' · ')
					:done()
				:wikitext('[' .. title:fullUrl('action=edit') .. ' ')
				:tag('span')
					:attr('title', '编辑该模板')
					:cssText(args.fontstyle)
					:wikitext(args.mini and '编' or '编辑')
					: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