Module:Lang/documentor tool/sandbox - Revision history

Gonnym: sync with live

2025-04-11T07:14:34Z

sync with live

← Previous revision		Revision as of 07:14, 11 April 2025
Line 11:		Line 11:

	local function private_tags (frame)		local function private_tags (frame)
	local override_t = mw.loadData ('Module:Lang/data').override; -- get the override table		local override_t = mw.loadData ('Module:Lang/data').override -- get the override table

	local private_t = {};		local private_t = {}

	for tag, lang in pairs (override_t) do		for tag, lang in pairs (override_t) do
Line 22:		Line 22:
	table.sort (private_t)		table.sort (private_t)

	table.insert (private_t, 1, '{\| class="wikitable sortable"');		table.insert (private_t, 1, '{\| class="wikitable sortable"')
	table.insert (private_t, 2, '\n\|+ Supported private-use IETF language tags')		table.insert (private_t, 2, '\n\|+ Supported private-use IETF language tags')
	table.insert (private_t, 3, '\n! Language !! Private-use tag')		table.insert (private_t, 3, '\n! Language !! Private-use tag')

	return table.concat (private_t) .. '\n\|}';		return table.concat (private_t) .. '\n\|}'
	-- return '<pre>' .. table.concat (private_t) .. '\n\|}' .. '</pre>'		-- return '<pre>' .. table.concat (private_t) .. '\n\|}' .. '</pre>'
	--error (mw.dumpObject (private_t))		--error (mw.dumpObject (private_t))
Line 70:		Line 70:
	end		end

	style = content:match('lang_xx_([^\|]+)');		style = content:match('lang_xx_([^\|]+)')
	if not style or ('italic' ~= mw.text.trim (style) and 'inherit' ~= mw.text.trim (style)) then		if not style or ('italic' ~= mw.text.trim (style) and 'inherit' ~= mw.text.trim (style)) then
	return '<span style="color:#d33">Error: template #invoke calls unknown function</span>';		return '<span style="color:#d33">Error: template #invoke calls unknown function</span>'
	end		end
	return table.concat({table.concat(out,'\n\|-\n! scope="row" \| '), '\n\|-\n\|colspan="2"\|style: ', style, '\n\|-\n\|}'}) -- add inter-row markup and close the wikitable and done		return table.concat({table.concat(out,'\n\|-\n! scope="row" \| '), '\n\|-\n\|colspan="2"\|style: ', style, '\n\|-\n\|}'}) -- add inter-row markup and close the wikitable and done
Line 110:		Line 110:

	- Tables:		- Tables:
			-- LANGUAGE_CATEGORIES
	-- language_categories
	-- error_messages		-- error_messages
	-- strings		-- strings
Line 124:		Line 124:
	]]		]]

	local ~~language_categories~~ = {		local LANGUAGE_CATEGORIES = {
	["LANGUAGES_SOURCES"] = "Articles with %s-language sources (%s)",		["LANGUAGES_SOURCES"] = "Articles with %s-language sources (%s)",
	["LANGUAGES_COLLECTIVE_SOURCES"] = "Articles with %s-collective sources (%s)",		["LANGUAGES_COLLECTIVE_SOURCES"] = "Articles with %s-collective sources (%s)",
	["CS1"] = "CS1 %s-language sources (%s)",		["CS1"] = "CS1 %s-language sources (%s)",
			["CS1_SCRIPT"] = "CS1 uses %s-language script (%s)",
	["LANGUAGE_TEXT"] = "Articles containing %s-language text",		["LANGUAGE_TEXT"] = "Articles containing %s-language text",
	-- old version ["LANGUAGES_COLLECTIVE_TEXT"] = "Articles with text from the %s collective",
	["LANGUAGES_COLLECTIVE_TEXT"] = "Articles with text in %s",		["LANGUAGES_COLLECTIVE_TEXT"] = "Articles with text in %s",
	["ENGLISH"] = "Articles containing explicitly cited %s-language text",		["ENGLISH"] = "Articles containing explicitly cited %s-language text",
			["IPA"] = "Pages with %s IPA"
	}		}

Line 231:		Line 232:
	local see_also_section = {}		local see_also_section = {}

	for _, category_name in pairs(~~language_categories~~) do		for _, category_name in pairs(LANGUAGE_CATEGORIES) do
	local category = mw.title.new(string.format(category_name, language_name, language_code), 14)		local category = mw.title.new(string.format(category_name, language_name, language_code), 14)
	if category and page_title ~= category.text and category.exists then		if category and page_title ~= category.text and category.exists then
Line 324:		Line 325:
	["LINE1"] = "This category contains articles with %s%s text. The primary purpose of these categories is to facilitate manual or automated checking of text in other languages.",		["LINE1"] = "This category contains articles with %s%s text. The primary purpose of these categories is to facilitate manual or automated checking of text in other languages.",
	["LINE2"] = "This category should only be added with the %s family of templates, never explicitly.",		["LINE2"] = "This category should only be added with the %s family of templates, never explicitly.",
	["LINE3"] = 'For example %s, which wraps the text with ~~<code><span lang="~~%s~~"></code>~~. Also available is %s which displays as %s.',		["LINE3"] = 'For example %s, which wraps the text with %s. Also available is %s which displays as %s.',
			["LINE3_SYNTAXHIGHLIGHT"] = "<span lang=\"%s\">",
	["IN_SCRIPT"] = " (in %s)",		["IN_SCRIPT"] = " (in %s)",
	["EXAMPLE_DEFAULT_TEXT"] = "text in %s language here",		["EXAMPLE_DEFAULT_TEXT"] = "text in %s language here",
Line 348:		Line 350:
	if page_title_modified:find('Articles with text in') then		if page_title_modified:find('Articles with text in') then
	-- Naming style: Category:Articles with text from Afro-Asiatic languages (as currently implemented in Module:lang)		-- Naming style: Category:Articles with text from Afro-Asiatic languages (as currently implemented in Module:lang)
	part1, part2 = ~~language_categories~~["LANGUAGES_COLLECTIVE_TEXT"]:match(split_title)		part1, part2 = LANGUAGE_CATEGORIES["LANGUAGES_COLLECTIVE_TEXT"]:match(split_title)
	elseif page_title_modified:find('explicitly cited') then		elseif page_title_modified:find('explicitly cited') then
	part1, part2 = ~~language_categories~~["ENGLISH"]:match(split_title)		part1, part2 = LANGUAGE_CATEGORIES["ENGLISH"]:match(split_title)
	else		else
	-- Naming style: Category:Articles containing French-language text		-- Naming style: Category:Articles containing French-language text
	part1, part2 = ~~language_categories~~["LANGUAGE_TEXT"]:match(split_title)		part1, part2 = LANGUAGE_CATEGORIES["LANGUAGE_TEXT"]:match(split_title)
	end		end

Line 387:		Line 389:
	-- Error: The current title used is not in the supported format. TODO: can this still be reached?		-- Error: The current title used is not in the supported format. TODO: can this still be reached?
	return make_error(		return make_error(
	string.format(error_messages["INCORRECT_CATEGORY_TITLE"], current_category_title, non_english_language_text_strings["~~LANG~~"], correct_language_category_title),		string.format(error_messages["INCORRECT_CATEGORY_TITLE"], current_category_title, non_english_language_text_strings["TEMPLATE"], correct_language_category_title),
	layout, parent_category, args.nocat)		layout, parent_category, args.nocat)
	end		end
Line 407:		Line 409:
	local example_default_text = string.format(non_english_language_text_strings["EXAMPLE_DEFAULT_TEXT"], language_name)		local example_default_text = string.format(non_english_language_text_strings["EXAMPLE_DEFAULT_TEXT"], language_name)
	local example_text = args.example or example_default_text		local example_text = args.example or example_default_text
	local lang_template_example = frame:expandTemplate{title = 'Tlx', args = {non_english_language_text_strings["TEMPLATE"], language_code_link, example_text}}		local lang_template_example = frame:expandTemplate{title = "Tlx", args = {non_english_language_text_strings["TEMPLATE"], language_code_link, example_text}}
	local langx_args = {non_english_language_text_strings["TEMPLATE2"], language_code_link, example_text}		local langx_args = {non_english_language_text_strings["TEMPLATE2"], language_code_link, example_text}
	local langx_template_example = frame:expandTemplate{title = 'Tlx', args = {non_english_language_text_strings["TEMPLATE2"], language_code, example_text}}		local langx_template_example = frame:expandTemplate{title = "Tlx", args = {non_english_language_text_strings["TEMPLATE2"], language_code, example_text}}
	local langx_template_code = frame:expandTemplate{title = non_english_language_text_strings["TEMPLATE2"], args = {language_code, example_text}}		local langx_template_code = frame:expandTemplate{title = non_english_language_text_strings["TEMPLATE2"], args = {language_code, example_text}}

⚫	table.insert(layout, string.format(non_english_language_text_strings["LINE3"], lang_template_example, ~~language_code~~, langx_template_example, langx_template_code))
			-- Strip private use subtag from code tag because this is what [[Module:Lang]] does.
			local language_code_without_private_use = language_code:gsub("%-x%-.*", "")

			-- Wrap in syntaxhighlight.
			local syntaxhighlight = frame:extensionTag(
			"syntaxhighlight",
			string.format(non_english_language_text_strings["LINE3_SYNTAXHIGHLIGHT"], language_code_without_private_use),
			{lang = "html", inline = true}
			)

		⚫	table.insert(layout, string.format(non_english_language_text_strings["LINE3"], lang_template_example, syntaxhighlight, langx_template_example, langx_template_code))
	local see_also_section = get_see_also_section(page.text, language_name, language_code)		local see_also_section = get_see_also_section(page.text, language_name, language_code)

Line 804:		Line 817:
	local function see_also (frame)		local function see_also (frame)
	if nil == frame.args[1] or '' == frame.args[1] then -- if empty, ...		if nil == frame.args[1] or '' == frame.args[1] then -- if empty, ...
	return; -- ... return nothing		return -- ... return nothing
	end		end

	return frame:preprocess (frame.args[1]:gsub ('%s*,%s', '\n')); -- preprocess so any templates are rendered before saving and done		return frame:preprocess (frame.args[1]:gsub ('%s*,%s', '\n')) -- preprocess so any templates are rendered before saving and done
	end		end

Gonnym at 11:07, 12 November 2024

2024-11-12T11:07:14Z

← Previous revision		Revision as of 11:07, 12 November 2024
Line 289:		Line 289:

	Generates a consistent non-text section which consists of:		Generates a consistent non-text section which consists of:
	-- Template:~~CatAutoTOC~~		-- Template:Automatic category TOC
	-- A see also section		-- A see also section
	-- {{DEFAULTSORT}}		-- {{DEFAULTSORT}}
Line 298:		Line 298:
	local function get_bottom_section(frame, language_name, see_also_section, parent_category, parent_language_category)		local function get_bottom_section(frame, language_name, see_also_section, parent_category, parent_language_category)
	local bottom_section = {}		local bottom_section = {}
	table.insert(bottom_section, frame:expandTemplate{title = '~~CatAutoTOC~~'})		table.insert(bottom_section, frame:expandTemplate{title = 'Automatic category TOC'})
	table.insert(bottom_section, see_also_section)		table.insert(bottom_section, see_also_section)

Line 418:		Line 418:
	if parent_language_code then		if parent_language_code then
	parent_language_category = lang_module._category_from_tag({parent_language_code})		parent_language_category = lang_module._category_from_tag({parent_language_code})
	mw.log(parent_language_category)
	end		end

Line 479:		Line 478:

	local parent_language_code = get_primary_language_code(language_code)		local parent_language_code = get_primary_language_code(language_code)
	mw.log(parent_language_code)
	local parent_language_category		local parent_language_category
	if parent_language_code then		if parent_language_code then

Gonnym at 11:05, 12 November 2024

2024-11-12T11:05:38Z

← Previous revision		Revision as of 11:05, 12 November 2024
Line 304:		Line 304:
	table.insert(bottom_section, frame:preprocess{text = "{{DEFAULTSORT:" .. language_name .. "}}"})		table.insert(bottom_section, frame:preprocess{text = "{{DEFAULTSORT:" .. language_name .. "}}"})
	if parent_language_category then		if parent_language_category then
	table.insert(bottom_section, parent_language_category)		table.insert(bottom_section, "[[" .. parent_language_category .. "]]")
	end		end
	table.insert(bottom_section, parent_category)		table.insert(bottom_section, parent_category)

Gonnym at 11:03, 12 November 2024

2024-11-12T11:03:38Z

← Previous revision		Revision as of 11:03, 12 November 2024
Line 415:		Line 415:

	local parent_language_code = get_primary_language_code(language_code)		local parent_language_code = get_primary_language_code(language_code)
	mw.log(parent_language_code)
	local parent_language_category		local parent_language_category
	if parent_language_code then		if parent_language_code then
	parent_language_category = lang_module._category_from_tag({~~language_code~~})		parent_language_category = lang_module._category_from_tag({parent_language_code})
			mw.log(parent_language_category)
	end		end

Gonnym at 11:02, 12 November 2024

2024-11-12T11:02:02Z

← Previous revision		Revision as of 11:02, 12 November 2024
Line 203:		Line 203:

	local function get_primary_language_code(language_code)		local function get_primary_language_code(language_code)
		⚫	-- If no hyphen exists, return nil (for cases like "el")
⚫	-- Match everything before the first hyphen, but only if a hyphen exists
	if language_code:~~match~~("^-") then		if not language_code:find("-") then
		⚫	return nil
⚫	return nil -- If the code starts with a hyphen, return nil
	end		end

		⚫	-- Match everything before the first hyphen, but only if a hyphen exists
			if language_code:match("^-") then
		⚫	return nil -- If the code starts with a hyphen, return nil
		⚫	end

	-- Look for the first part before any hyphen		-- Look for the first part before any hyphen
	local ~~primaryCode~~ = language_code:match("^[^-]+")		local primary_code = language_code:match("^[^-]+")
			return primary_code

⚫	-- If no hyphen exists, return nil (for cases like "~~gr" or "grk~~")
	if not primaryCode:find("-") then
⚫	return nil
⚫	end

	return primaryCode
	end		end

Gonnym at 10:56, 12 November 2024

2024-11-12T10:56:24Z

← Previous revision		Revision as of 10:56, 12 November 2024
Line 416:		Line 416:

	local parent_language_code = get_primary_language_code(language_code)		local parent_language_code = get_primary_language_code(language_code)
			mw.log(parent_language_code)
	local parent_language_category		local parent_language_category
	if parent_language_code then		if parent_language_code then
Line 479:		Line 480:

	local parent_language_code = get_primary_language_code(language_code)		local parent_language_code = get_primary_language_code(language_code)
			mw.log(parent_language_code)
	local parent_language_category		local parent_language_category
	if parent_language_code then		if parent_language_code then

Gonnym at 10:49, 12 November 2024

2024-11-12T10:49:46Z

@@ Line 193: / Line 193: @@
 		return lang_module.name_from_tag({language_code, link = "yes", label = lang_module.name_from_tag({language_code}) .. "-language"})
 	end
 end
@@ Line 273: / Line 297: @@
 ]]
-local function get_bottom_section(frame, language_name, see_also_section, parent_category)
+local function get_bottom_section(frame, language_name, see_also_section, parent_category, parent_language_category)
 	local bottom_section = {}
 	table.insert(bottom_section, frame:expandTemplate{title = 'CatAutoTOC'})
@@ Line 280: / Line 304: @@
 	if mw.title.getCurrentTitle().nsText == "Category" then
 		table.insert(bottom_section, frame:preprocess{text = "{{DEFAULTSORT:" .. language_name .. "}}"})
 		table.insert(bottom_section, parent_category)
 	end
@@ Line 388: / Line 415: @@
 	local see_also_section = get_see_also_section(page.text, language_name, language_code)
 	return table.concat(layout, "\n\n") .. bottom
 end
@@ Line 422: / Line 455: @@
 	table.insert(layout, get_hidden_category_template(frame))
 	local parent_category = non_english_language_sources_strings["PARENT_CATEGORY"]
-	local correct_language_category_title = require('Module:In lang')._in_lang({language_code, ["list-cats"]="yes"})
+	local in_lang_module = require('Module:In lang')
 	if correct_language_category_title == "" then
 		-- Error: No category title found for language code.
@@ Line 444: / Line 478: @@
 	local see_also_section = get_see_also_section(page_title, language_name, language_code)
 	return table.concat(layout, "\n\n") .. bottom
 end

Gonnym: sync with live

2024-11-12T10:23:23Z

sync with live

← Previous revision		Revision as of 10:23, 12 November 2024
Line 515:		Line 515:
	local function get_language_code_and_name_table_from_code(args)		local function get_language_code_and_name_table_from_code(args)
	local entry = {}		local entry = {}
	if args.override_table[args.language_code] then		if args.override_table and args.override_table[args.language_code] then
	table.insert(entry, args.language_code)		table.insert(entry, args.language_code)
	local language_code, _ = args.override_table[args.language_code][1]:gsub(' %b()$', '')		local language_code, _ = args.override_table[args.language_code][1]:gsub(' %b()$', '')

Gonnym at 19:03, 7 October 2024

2024-10-07T19:03:43Z

← Previous revision		Revision as of 19:03, 7 October 2024
Line 1:		Line 1:
	require('strict')		require('strict')
	local p = {}		local p = {}


	--[[ -------------------------< P R I V A T E _ T A G S >------------------------------------------------------		--[[ -------------------------< P R I V A T E _ T A G S >------------------------------------------------------

Gonnym: update for langx

2024-10-06T20:02:22Z

update for langx

← Previous revision		Revision as of 20:02, 6 October 2024
Line 299:		Line 299:
	["LINE1"] = "This category contains articles with %s%s text. The primary purpose of these categories is to facilitate manual or automated checking of text in other languages.",		["LINE1"] = "This category contains articles with %s%s text. The primary purpose of these categories is to facilitate manual or automated checking of text in other languages.",
	["LINE2"] = "This category should only be added with the %s family of templates, never explicitly.",		["LINE2"] = "This category should only be added with the %s family of templates, never explicitly.",
	["LINE3"] = 'For example %s, which wraps the text with <code><span lang="%s"></code>.%s',		["LINE3"] = 'For example %s, which wraps the text with <code><span lang="%s"></code>. Also available is %s which displays as %s.',
	["LINE3_EXTRA"] = " Also available is %s which displays as %s.",
	["IN_SCRIPT"] = " (in %s)",		["IN_SCRIPT"] = " (in %s)",
	["EXAMPLE_DEFAULT_TEXT"] = "text in %s language here",		["EXAMPLE_DEFAULT_TEXT"] = "text in %s language here",
	["PARENT_CATEGORY"] = "[[Category:Articles containing non-English-language text]]",		["PARENT_CATEGORY"] = "[[Category:Articles containing non-English-language text]]",
	["TEMPLATE"] = "Lang",		["TEMPLATE"] = "Lang",
			["TEMPLATE2"] = "Langx",
	}		}

Line 383:		Line 383:
	local example_text = args.example or example_default_text		local example_text = args.example or example_default_text
	local lang_template_example = frame:expandTemplate{title = 'Tlx', args = {non_english_language_text_strings["TEMPLATE"], language_code_link, example_text}}		local lang_template_example = frame:expandTemplate{title = 'Tlx', args = {non_english_language_text_strings["TEMPLATE"], language_code_link, example_text}}
			local langx_args = {non_english_language_text_strings["TEMPLATE2"], language_code_link, example_text}
	local lang_x = mw.title.makeTitle(10, "Lang-" .. language_code)
		⚫	local langx_template_example = frame:expandTemplate{title = 'Tlx', args = {non_english_language_text_strings["TEMPLATE2"], language_code, example_text}}

		⚫	local langx_template_code = frame:expandTemplate{title = non_english_language_text_strings["TEMPLATE2"], args = {language_code, example_text}}
	local line3_extra = ""
		⚫	table.insert(layout, string.format(non_english_language_text_strings["LINE3"], lang_template_example, language_code, langx_template_example, langx_template_code))
	if lang_x.exists then
⚫	local ~~lang_x_template_example~~ = frame:expandTemplate{title = 'Tlx', args = {~~lang_x.text~~, example_text}}
⚫	local ~~lang_x_template~~ = frame:expandTemplate{title = ~~lang_x.text~~, args = {example_text}}
	line3_extra = string.format(non_english_language_text_strings["LINE3_EXTRA"], lang_x_template_example, lang_x_template)
	end

⚫	table.insert(layout, string.format(non_english_language_text_strings["LINE3"], lang_template_example, language_code, ~~line3_extra~~))
	local see_also_section = get_see_also_section(page.text, language_name, language_code)		local see_also_section = get_see_also_section(page.text, language_name, language_code)