Module:Vertical header/sandbox - Revision history

Mathglot: Use Module:Vertical header/sandbox/styles.css.

2024-09-19T21:29:42Z

Use Module:Vertical header/sandbox/styles.css.

← Previous revision		Revision as of 21:29, 19 September 2024
Line 2:		Line 2:
	local p = {}		local p = {}

	local templatestylesPage = 'Module:Vertical header/styles.css'		local templatestylesPage = 'Module:Vertical header/sandbox/styles.css'

	local function isEmpty(s)		local function isEmpty(s)

Mathglot: Sync from rev. 1232249886‎ of module..

2024-09-19T21:28:21Z

Sync from rev. 1232249886‎ of module..

← Previous revision		Revision as of 21:28, 19 September 2024
Line 1:		Line 1:
			require( 'strict' )
	local p = {}		local p = {}

			local templatestylesPage = 'Module:Vertical header/styles.css'

			local function isEmpty(s)
			return s == nil or s == ''
		⚫	end

	function p._vertical_header(args)		function p._vertical_header(args)
⚫
	local text = args.text		local text = args.text
	local maxWidth = args.maxWidth		local maxWidth = args.maxWidth
	-- local stupidIEAlign = ""
	local rows = 1		local rows = 1
	local width = 0		local width = 0
	if maxWidth ~= "" then		if maxWidth ~= '' then
	width = maxWidth		width = maxWidth
	else		else
	for eachMatch in text:gmatch("<[bB][rR] /? >") do		for eachMatch in text:gmatch('<[bB][rR] /? >') do
	rows = rows + 1		rows = rows + 1
	end		end

⚫	width = ~~rows~~ * 0.~~875~~
	width = ~~width .. "em"~~		width = rows
		⚫	width = width .. 'em'
	end		end

	local ~~wikiText~~ = "class = ~~\"nowrap"~~		local class = args.class or ''
			local vertAlign = not isEmpty( args.vertAlign ) and 'is-valign-' .. args.vertAlign or ''
	local sortPadding = args.sortPadding
		⚫	local noBold = isEmpty( args.noBold ) and '' or 'is-normal'
	if sortPadding == "" then
			local wikiText = string.format( 'class="nowrap ts-vertical-header %s %s %s"', vertAlign, noBold, class )
⚫	wikiText = wikiText .. " ~~unsortable~~"
⚫	end

	local ~~vertAlign~~ = args.~~vertAlign~~		local cellStyle = ( args.cellstyle or '' ):gsub("\"", """)
			if width and width ~= '1em' then
	wikiText = wikiText .. "\" style=\"line-height:99%;vertical-align:" .. vertAlign .. ";padding:"
		⚫	wikiText = wikiText .. string.format( ' style="max-width:%s; width:%s; %s"', width, width, cellStyle )
	if sortPadding == "" then
			elseif cellStyle then
⚫	wikiText = wikiText .. ".~~4em"~~
			wikiText = wikiText .. string.format( ' style="%s"', cellStyle )
	else
	wikiText = wikiText .. "21px"
	end		end
	wikiText = wikiText .. " .4em .2em;background-position:50% .4em !important;"

	local cellStyle = args.cellstyle:gsub("\"", """)
⚫	wikiText = wikiText .. ~~"min-width:" .~~. ~~width ..~~ ";max-width:~~" ..~~ width .. ";width~~:" ..~~ width ~~.. ";overflow:hidden;" ..~~ cellStyle ~~.. "\""~~
	wikiText = wikiText .. " \| <div style=\"vertical-rl=-webkit-writing-mode: vertical-rl; -o-writing-mode: vertical-rl; -ms-writing-mode: tb-rl;writing-mode: tb-rl; writing-mode: vertical-rl; layout-flow: vertical-ideographic;transform:rotate(180deg);display:inline-block;padding-left:1px;text-align:"

	local normalAlign = ""
	if vertAlign == "top" then
	normalAlign = "right"
	-- stupidIEAlign = "left"
	elseif vertAlign == "middle" then
	normalAlign = "center"
	-- stupidIEAlign = "center"
	else
	normalAlign = "left"
	-- stupidIEAlign = "right"
	end
	wikiText = wikiText .. normalAlign .. ";" -- text-align:" .. stupidIEAlign .. " \ ;"

		⚫	wikiText = wikiText .. ' \| <div style="'
	local style = args.style:gsub("\"", """)		local style = args.style:gsub("\"", """)
	wikiText = wikiText .. style .. "\">"		wikiText = wikiText .. style .. "\">"

			-- Add TemplateStyles
⚫	local noBold = args.noBold
		⚫	wikiText = wikiText .. mw.getCurrentFrame():extensionTag{
	if noBold == "" then
			name = 'templatestyles',
	wikiText = wikiText .. text
			args = { src = templatestylesPage }
	else
		⚫	}
	wikiText = wikiText .. mw.getCurrentFrame():preprocess("{{nobold\|1=" .. text .. "}}")
	~~end~~
	wikiText = wikiText .. "</div>"		wikiText = wikiText .. text .. '</div>'
	return wikiText		return wikiText
	end		end

Izno: sandybox

2022-11-04T02:33:25Z

sandybox

Show changes

Mr. Stradivarius: use "cellAttributes" instead of "thAttributes"

2020-08-02T14:24:23Z

use "cellAttributes" instead of "thAttributes"

← Previous revision		Revision as of 14:24, 2 August 2020
Line 71:		Line 71:

	local function formatOutput(text, cellClasses, cellStyles, divClasses, divStyles)		local function formatOutput(text, cellClasses, cellStyles, divClasses, divStyles)
	~~thAttributes~~ = {}		cellAttributes = {}
	table.insert(~~thAttributes~~, formatAttribute{attrName = "class", attrs = cellClasses, separator = " "})		table.insert(cellAttributes, formatAttribute{attrName = "class", attrs = cellClasses, separator = " "})
	table.insert(~~thAttributes~~, formatAttribute{attrName = "style", attrs = cellStyles})		table.insert(cellAttributes, formatAttribute{attrName = "style", attrs = cellStyles})

	local div = mw.html.create("div")		local div = mw.html.create("div")
Line 84:		Line 84:
	div:wikitext(text)		div:wikitext(text)

	return string.format("%s \| %s", table.concat(~~thAttributes~~, " "), tostring(div))		return string.format(
			"%s \| %s",
			table.concat(cellAttributes, " "),
			tostring(div)
			)
	end		end

Mr. Stradivarius: simplify double-quote string

2020-08-02T14:21:51Z

simplify double-quote string

← Previous revision		Revision as of 14:21, 2 August 2020
Line 5:		Line 5:
	return nil		return nil
	end		end
	return text:gsub("~~\""~~, """)		return text:gsub('"', """)
	end		end

Mr. Stradivarius: fix bad variable names

2020-08-02T10:00:38Z

fix bad variable names

← Previous revision		Revision as of 10:00, 2 August 2020
Line 42:		Line 42:
	-- In the rare event that there are more than 4 rows, use inline styles.		-- In the rare event that there are more than 4 rows, use inline styles.
	if rowCount >= 2 and rowCount <= 4 then		if rowCount >= 2 and rowCount <= 4 then
	table.insert(~~tableClasses~~, string.format("vertical-header-%drows", rowCount))		table.insert(cellClasses, string.format("vertical-header-%drows", rowCount))
	elseif rowCount > 4 then		elseif rowCount > 4 then
	table.insert(~~tableStyles~~, string.format("width:%.3fem", rowCount * 0.875))		table.insert(cellStyles, string.format("width:%.3fem", rowCount * 0.875))
	end		end
	end		end

Mr. Stradivarius: allow users not to specify the text parameter

2020-08-02T07:39:26Z

allow users not to specify the text parameter

← Previous revision		Revision as of 07:39, 2 August 2020
Line 9:		Line 9:

	local function getRowCount(text)		local function getRowCount(text)
			if not text then
			return 0
			end
	local _, count = text:gsub("<[bB][rR] /? >", "%0")		local _, count = text:gsub("<[bB][rR] /? >", "%0")
	return count + 1		return count + 1

Mr. Stradivarius: use "cell" instead of "th", because 1) template header cells are technically cells, 2) the existing parameter name is "cellstyles", and 3) it is possible (though unwise) to use the template in a non-header cell

2020-08-02T07:32:28Z

use "cell" instead of "th", because 1) template header cells are technically cells, 2) the existing parameter name is "cellstyles", and 3) it is possible (though unwise) to use the template in a non-header cell

← Previous revision		Revision as of 07:32, 2 August 2020
Line 14:		Line 14:

	local function getAttributeData(options)		local function getAttributeData(options)
	local ~~thClasses~~ = {"vertical-header", "nowrap"}		local cellClasses = {"vertical-header", "nowrap"}
	local ~~thStyles~~ = {}		local cellStyles = {}
	local divClasses = {}		local divClasses = {}
	local divStyles = {}		local divStyles = {}

	if options.sortPadding then		if options.sortPadding then
	table.insert(~~thClasses~~, "vertical-header-sortable")		table.insert(cellClasses, "vertical-header-sortable")
	else		else
	table.insert(~~thClasses~~, "unsortable")		table.insert(cellClasses, "unsortable")
	end		end

	if options.vertAlign == "top" then		if options.vertAlign == "top" then
	table.insert(~~thClasses~~, "vertical-header-align-top")		table.insert(cellClasses, "vertical-header-align-top")
	elseif options.vertAlign == "middle" then		elseif options.vertAlign == "middle" then
	table.insert(~~thClasses~~, "vertical-header-align-middle")		table.insert(cellClasses, "vertical-header-align-middle")
	end		end

	if options.manualWidth then		if options.manualWidth then
	table.insert(~~thStyles~~, "width:" .. options.manualWidth)		table.insert(cellStyles, "width:" .. options.manualWidth)
	else		else
	local rowCount = getRowCount(options.text)		local rowCount = getRowCount(options.text)
Line 49:		Line 49:
	end		end

	table.insert(~~thStyles~~, options.~~extraThStyles~~)		table.insert(cellStyles, options.extraCellStyles)
	table.insert(divStyles, options.extraDivStyles)		table.insert(divStyles, options.extraDivStyles)

	return ~~thClasses~~, ~~thStyles~~, divClasses, divStyles		return cellClasses, cellStyles, divClasses, divStyles
	end		end

Line 67:		Line 67:
	end		end

	local function formatOutput(text, ~~thClasses~~, ~~thStyles~~, divClasses, divStyles)		local function formatOutput(text, cellClasses, cellStyles, divClasses, divStyles)
	thAttributes = {}		thAttributes = {}
	table.insert(thAttributes, formatAttribute{attrName = "class", attrs = ~~thClasses~~, separator = " "})		table.insert(thAttributes, formatAttribute{attrName = "class", attrs = cellClasses, separator = " "})
	table.insert(thAttributes, formatAttribute{attrName = "style", attrs = ~~thStyles~~})		table.insert(thAttributes, formatAttribute{attrName = "style", attrs = cellStyles})

	local div = mw.html.create("div")		local div = mw.html.create("div")
Line 86:		Line 86:
	function p._cell(args)		function p._cell(args)
	local text = args[1]		local text = args[1]
	local ~~thClasses~~, ~~thStyles~~, divClasses, divStyles = getAttributeData{		local cellClasses, cellStyles, divClasses, divStyles = getAttributeData{
	text = text,		text = text,
	sortPadding = args.stp,		sortPadding = args.stp,
Line 92:		Line 92:
	manualWidth = args.mw,		manualWidth = args.mw,
	noBold = args.nb,		noBold = args.nb,
	~~extraThStyles~~ = escapeQuotes(args.cellstyle),		extraCellStyles = escapeQuotes(args.cellstyle),
	extraDivStyles = escapeQuotes(args.style)		extraDivStyles = escapeQuotes(args.style)
	}		}
	return formatOutput(text, ~~thClasses~~, ~~thStyles~~, divClasses, divStyles)		return formatOutput(text, cellClasses, cellStyles, divClasses, divStyles)
	end		end

Mr. Stradivarius: refactor the attribute-getting code and the result-formatting code into separate functions

2020-08-02T07:27:24Z

refactor the attribute-getting code and the result-formatting code into separate functions

Show changes

Mr. Stradivarius: rewrite this to use template styles

2020-08-02T07:07:49Z

rewrite this to use template styles

@@ Line 1: / Line 1: @@
 local p = {}
-function p.cell(frame)
+local function getRowCount(text)
-	local text = frame.args.text
+	local _, count = text:gsub("<[bB][rR] */? *>", "%0")
 	end
 	else
 	end
 	if vertAlign == "top" then
 	elseif vertAlign == "middle" then
 	end
 	else
 	end
 end