Module:Portal toolbox - Revision history

Andrybak: add "clear: right;" to the main CSS

2020-11-05T23:00:12Z

add "clear: right;" to the main CSS

← Previous revision		Revision as of 23:00, 5 November 2020
Line 61:		Line 61:
	local args = getArgs(frame)		local args = getArgs(frame)
	local tbl = mw.html.create('table')		local tbl = mw.html.create('table')
	:cssText('float:right; border:1px navy solid;')		:cssText('clear: right; float:right; border:1px navy solid;')
	tbl:tag('caption')		tbl:tag('caption')
	:wikitext('Portal toolbox')		:wikitext('Portal toolbox')

Andrybak: rename functions for clarity; rename local variables for clarity; clean up

2020-06-13T19:24:42Z

rename functions for clarity; rename local variables for clarity; clean up

← Previous revision		Revision as of 19:24, 13 June 2020
Line 3:		Line 3:
	p = {}		p = {}

	local function ~~toolbox_header_row~~(frame, tbl, text)		local function add_header_row(frame, tbl, text)
	local row = tbl:tag('tr')		local row = tbl:tag('tr')
	row:tag('th')		row:tag('th')
Line 14:		Line 14:
	end		end

	local function ~~toolbox_template_row~~(frame, tbl, pagename)		local function add_template_row(frame, tbl, pagename)
	local row = tbl:tag('tr')		local row = tbl:tag('tr')
	row:tag('td')		row:tag('td')
Line 22:		Line 22:
	end		end

	local function ~~toolbox_row~~(frame, tbl, pagename, text, right)		local function add_wikilink_row(frame, tbl, pagename, text, right)
	local row = tbl:tag('tr')		local row = tbl:tag('tr')
	row:tag('td')		row:tag('td')
Line 30:		Line 30:
	end		end

	local function ~~toolbox_section~~(frame, args, tbl, ~~section_header~~, arg_prefix, page_prefix, row_function)		local function add_section(frame, args, tbl, add_section_header, arg_prefix, page_prefix, row_function)
	if row_function == nil then		if row_function == nil then
	row_function = ~~toolbox_row~~		row_function = add_wikilink_row
	end		end
	local nums = {}		local nums = {}
Line 47:		Line 47:
	end		end
	table.sort(nums)		table.sort(nums)
	~~toolbox_header_row~~(frame, tbl, ~~section_header~~)		add_header_row(frame, tbl, add_section_header)
	for _, num in ipairs(nums) do		for _, num in ipairs(nums) do
	local arg_name = arg_prefix .. num		local arg_name = arg_prefix .. num
	local a = args[arg_name]		local arg = args[arg_name]
	local pagename = page_prefix .. a		local pagename = page_prefix .. arg
	local text = args[arg_name .. 'text']		local text = args[arg_name .. 'text']
	local right = args[arg_name .. 'right']		local right = args[arg_name .. 'right']
		⚫	row_function(frame, tbl, pagename, text or arg, right)
	if text == nil then
	text = a
	end
⚫	row_function(frame, tbl, pagename, text, right)
	end		end
	end		end
Line 67:		Line 64:
	tbl:tag('caption')		tbl:tag('caption')
	:wikitext('Portal toolbox')		:wikitext('Portal toolbox')
	~~toolbox_header_row~~(frame, tbl, 'Main portal page')		add_header_row(frame, tbl, 'Main portal page')
	local rootTitle = mw.title.getCurrentTitle().rootPageTitle.subjectPageTitle		local rootTitle = mw.title.getCurrentTitle().rootPageTitle.subjectPageTitle
	~~toolbox_row~~(frame, tbl, rootTitle.fullText~~, nil, edit(frame, rootTitle.fullText)~~)		add_wikilink_row(frame, tbl, rootTitle.fullText)

	~~toolbox_section~~(frame, args, tbl, 'Static subpages', 'static', rootTitle.fullText .. '/')		add_section(frame, args, tbl, 'Static subpages', 'static', rootTitle.fullText .. '/')
	~~toolbox_section~~(frame, args, tbl, 'Dynamic subpages', 'dynamic', rootTitle.fullText .. '/')		add_section(frame, args, tbl, 'Dynamic subpages', 'dynamic', rootTitle.fullText .. '/')
	~~toolbox_section~~(frame, args, tbl, 'Templates', 'template', '', ~~toolbox_template_row~~)		add_section(frame, args, tbl, 'Templates', 'template', '', add_template_row)
	~~toolbox_section~~(frame, args, tbl, 'Other', 'other', '')		add_section(frame, args, tbl, 'Other', 'other', '')
	return tbl		return tbl
	end		end

Andrybak: rename function parameter for clarity

2020-06-13T19:19:41Z

rename function parameter for clarity

← Previous revision		Revision as of 19:19, 13 June 2020
Line 30:		Line 30:
	end		end

	local function toolbox_section(frame, args, tbl, section_header, ~~prefix~~, page_prefix, row_function)		local function toolbox_section(frame, args, tbl, section_header, arg_prefix, page_prefix, row_function)
	if row_function == nil then		if row_function == nil then
	row_function = toolbox_row		row_function = toolbox_row
Line 37:		Line 37:
	for k, _ in pairs(args) do		for k, _ in pairs(args) do
	if type(k) == 'string' then		if type(k) == 'string' then
	local num = k:match('^' .. ~~prefix~~ .. '(%d+)$')		local num = k:match('^' .. arg_prefix .. '(%d+)$')
	if num then		if num then
	table.insert(nums, tonumber(num))		table.insert(nums, tonumber(num))
Line 49:		Line 49:
	toolbox_header_row(frame, tbl, section_header)		toolbox_header_row(frame, tbl, section_header)
	for _, num in ipairs(nums) do		for _, num in ipairs(nums) do
	local arg_name = ~~prefix~~ .. num		local arg_name = arg_prefix .. num
	local a = args[arg_name]		local a = args[arg_name]
	local pagename = page_prefix .. a		local pagename = page_prefix .. a

Andrybak: simplify

2020-06-13T18:42:44Z

simplify

← Previous revision		Revision as of 18:42, 13 June 2020
Line 27:		Line 27:
	:wikitext('[[' .. pagename .. '\|' .. (text or pagename) .. ']]')		:wikitext('[[' .. pagename .. '\|' .. (text or pagename) .. ']]')
	row:tag('td')		row:tag('td')
	:wikitext(right)		:wikitext(right or edit(frame, pagename))
	end		end

Line 56:		Line 56:
	if text == nil then		if text == nil then
	text = a		text = a
	end
	if right == nil then
	right = edit(frame, pagename)
	end		end
	row_function(frame, tbl, pagename, text, right)		row_function(frame, tbl, pagename, text, right)

Andrybak: add support for parameter "template"; clean up

2020-06-13T18:29:11Z

add support for parameter "template"; clean up

← Previous revision		Revision as of 18:29, 13 June 2020
Line 11:		Line 11:

	local function edit(frame, pagename)		local function edit(frame, pagename)
	return frame:expandTemplate{ title='edit', args = { pagename } }		return frame:expandTemplate{ title='edit', args={ pagename } }
			end

			local function toolbox_template_row(frame, tbl, pagename)
			local row = tbl:tag('tr')
			row:tag('td')
			:wikitext(frame:expandTemplate{ title='tl', args={ pagename } })
			row:tag('td')
			:wikitext(edit(frame, 'Template:' .. pagename))
	end		end

Line 22:		Line 30:
	end		end

	local function toolbox_section(frame, args, tbl, ~~rootTitle, title~~, prefix, page_prefix)		local function toolbox_section(frame, args, tbl, section_header, prefix, page_prefix, row_function)
			if row_function == nil then
⚫	toolbox_header_row(frame, tbl, ~~title~~)
			row_function = toolbox_row
			end
	local nums = {}		local nums = {}
	for k, _ in pairs(args) do		for k, _ in pairs(args) do
Line 32:		Line 42:
	end		end
	end		end
			end
			if #nums == 0 then
			return
	end		end
	table.sort(nums)		table.sort(nums)
		⚫	toolbox_header_row(frame, tbl, section_header)
	for _, num in ipairs(nums) do		for _, num in ipairs(nums) do
	local arg_name = prefix .. num		local arg_name = prefix .. num
Line 46:		Line 60:
	right = edit(frame, pagename)		right = edit(frame, pagename)
	end		end
	~~toolbox_row~~(frame, tbl, pagename, text, right)		row_function(frame, tbl, pagename, text, right)
	end		end
	end		end
Line 60:		Line 74:
	toolbox_row(frame, tbl, rootTitle.fullText, nil, edit(frame, rootTitle.fullText))		toolbox_row(frame, tbl, rootTitle.fullText, nil, edit(frame, rootTitle.fullText))

	toolbox_section(frame, args, tbl~~, rootTitle~~, 'Static subpages', 'static', rootTitle.fullText .. '/')		toolbox_section(frame, args, tbl, 'Static subpages', 'static', rootTitle.fullText .. '/')
	toolbox_section(frame, args, tbl~~, rootTitle~~, 'Dynamic subpages', 'dynamic', rootTitle.fullText .. '/')		toolbox_section(frame, args, tbl, 'Dynamic subpages', 'dynamic', rootTitle.fullText .. '/')
	toolbox_section(frame, args, tbl~~, rootTitle~~, '~~Other~~', '~~other~~', '')		toolbox_section(frame, args, tbl, 'Templates', 'template', '', toolbox_template_row)
			toolbox_section(frame, args, tbl, 'Other', 'other', '')
	return tbl		return tbl
	end		end

Andrybak: reduce amount of duplication needed

2020-06-13T15:33:10Z

reduce amount of duplication needed

← Previous revision		Revision as of 15:33, 13 June 2020
Line 22:		Line 22:
	end		end

	local function toolbox_section(frame, args, tbl, rootTitle, title, prefix)		local function toolbox_section(frame, args, tbl, rootTitle, title, prefix, page_prefix)
	toolbox_header_row(frame, tbl, title)		toolbox_header_row(frame, tbl, title)
	local nums = {}		local nums = {}
Line 37:		Line 37:
	local arg_name = prefix .. num		local arg_name = prefix .. num
	local a = args[arg_name]		local a = args[arg_name]
	local t = mw.~~title~~.~~new(a,~~ ~~'Portal')~~		local pagename = page_prefix .. a
	local text = args[arg_name .. 'text']		local text = args[arg_name .. 'text']
	local right = args[arg_name .. 'right']		local right = args[arg_name .. 'right']
	if ~~not~~ text ~~and~~ ~~t:isSubpageOf(rootTitle)~~ then		if text == nil then
	text = ~~t.subpageText~~		text = a
	end		end
	if right == nil then		if right == nil then
	right = edit(frame, a)		right = edit(frame, pagename)
	end		end
	toolbox_row(frame, tbl, a, text, right)		toolbox_row(frame, tbl, pagename, text, right)
	end		end
	end		end
Line 60:		Line 60:
	toolbox_row(frame, tbl, rootTitle.fullText, nil, edit(frame, rootTitle.fullText))		toolbox_row(frame, tbl, rootTitle.fullText, nil, edit(frame, rootTitle.fullText))

	toolbox_section(frame, args, tbl, rootTitle, 'Static subpages', 'static')		toolbox_section(frame, args, tbl, rootTitle, 'Static subpages', 'static', rootTitle.fullText .. '/')
	toolbox_section(frame, args, tbl, rootTitle, 'Dynamic subpages', 'dynamic')		toolbox_section(frame, args, tbl, rootTitle, 'Dynamic subpages', 'dynamic', rootTitle.fullText .. '/')
	toolbox_section(frame, args, tbl, rootTitle, 'Other', 'other')		toolbox_section(frame, args, tbl, rootTitle, 'Other', 'other', '')
	return tbl		return tbl
	end		end

Andrybak: prefer user supplied text to 'subpageText'

2020-06-13T15:11:02Z

prefer user supplied text to 'subpageText'

← Previous revision		Revision as of 15:11, 13 June 2020
Line 40:		Line 40:
	local text = args[arg_name .. 'text']		local text = args[arg_name .. 'text']
	local right = args[arg_name .. 'right']		local right = args[arg_name .. 'right']
	if t:isSubpageOf(rootTitle) then		if not text and t:isSubpageOf(rootTitle) then
	text = t.subpageText		text = t.subpageText
	end		end

Andrybak: add support for custom text

2020-06-13T15:09:18Z

add support for custom text

← Previous revision		Revision as of 15:09, 13 June 2020
Line 38:		Line 38:
	local a = args[arg_name]		local a = args[arg_name]
	local t = mw.title.new(a, 'Portal')		local t = mw.title.new(a, 'Portal')
	local text = ~~nil~~		local text = args[arg_name .. 'text']
	local right = args[arg_name .. 'right']		local right = args[arg_name .. 'right']
	if t:isSubpageOf(rootTitle) then		if t:isSubpageOf(rootTitle) then

Andrybak: fix

2020-06-13T15:01:05Z

fix

← Previous revision		Revision as of 15:01, 13 June 2020
Line 8:		Line 8:
	:attr('colspan', '2')		:attr('colspan', '2')
	:wikitext(text)		:wikitext(text)
			end

			local function edit(frame, pagename)
			return frame:expandTemplate{ title='edit', args = { pagename } }
	end		end

Line 40:		Line 44:
	end		end
	if right == nil then		if right == nil then
	right = frame~~:expandTemplate{ title='edit'~~, ~~args = {~~ a ~~} }~~		right = edit(frame, a)
	end		end
	toolbox_row(frame, tbl, a, text, right)		toolbox_row(frame, tbl, a, text, right)
Line 54:		Line 58:
	toolbox_header_row(frame, tbl, 'Main portal page')		toolbox_header_row(frame, tbl, 'Main portal page')
	local rootTitle = mw.title.getCurrentTitle().rootPageTitle.subjectPageTitle		local rootTitle = mw.title.getCurrentTitle().rootPageTitle.subjectPageTitle
	~~toolbox_edit_row~~(frame, tbl, rootTitle.fullText)		toolbox_row(frame, tbl, rootTitle.fullText, nil, edit(frame, rootTitle.fullText))

	toolbox_section(frame, args, tbl, rootTitle, 'Static subpages', 'static')		toolbox_section(frame, args, tbl, rootTitle, 'Static subpages', 'static')

Andrybak: create a new module

2020-06-13T14:59:04Z

create a new module

New page

local getArgs = require('Module:Arguments').getArgs

p = {}

local function toolbox_header_row(frame, tbl, text)
local row = tbl:tag('tr')
row:tag('th')
:attr('colspan', '2')
:wikitext(text)
end

local function toolbox_row(frame, tbl, pagename, text, right)
local row = tbl:tag('tr')
row:tag('td')
:wikitext('[[' .. pagename .. '|' .. (text or pagename) .. ']]')
row:tag('td')
:wikitext(right)
end

local function toolbox_section(frame, args, tbl, rootTitle, title, prefix)
toolbox_header_row(frame, tbl, title)
local nums = {}
for k, _ in pairs(args) do
if type(k) == 'string' then
local num = k:match('^' .. prefix .. '(%d+)$')
if num then
table.insert(nums, tonumber(num))
end
end
end
table.sort(nums)
for _, num in ipairs(nums) do
local arg_name = prefix .. num
local a = args[arg_name]
local t = mw.title.new(a, 'Portal')
local text = nil
local right = args[arg_name .. 'right']
if t:isSubpageOf(rootTitle) then
text = t.subpageText
end
if right == nil then
right = frame:expandTemplate{ title='edit', args = { a } }
end
toolbox_row(frame, tbl, a, text, right)
end
end

local function main(frame)
local args = getArgs(frame)
local tbl = mw.html.create('table')
:cssText('float:right; border:1px navy solid;')
tbl:tag('caption')
:wikitext('Portal toolbox')
toolbox_header_row(frame, tbl, 'Main portal page')
local rootTitle = mw.title.getCurrentTitle().rootPageTitle.subjectPageTitle
toolbox_edit_row(frame, tbl, rootTitle.fullText)

toolbox_section(frame, args, tbl, rootTitle, 'Static subpages', 'static')
toolbox_section(frame, args, tbl, rootTitle, 'Dynamic subpages', 'dynamic')
toolbox_section(frame, args, tbl, rootTitle, 'Other', 'other')
return tbl
end

p.main = main

return p