Module:language-like - Revision history

Sware at 23:29, 4 February 2025

2025-02-04T23:29:18Z

← Older revision		Revision as of 23:29, 4 February 2025
Line 192:		Line 192:
	article = self:getCanonicalName() or false --item and sitelink(item, project) or false		article = self:getCanonicalName() or false --item and sitelink(item, project) or false
	if article then		if article then
	return ~~(self:hasType("conlang") and "ling:" or "") ..~~ article		return article
	end		end
	-- If there's still no article, try the parent (if any).		-- If there's still no article, try the parent (if any).

Sware at 18:02, 11 January 2025

2025-01-11T18:02:48Z

← Older revision		Revision as of 18:02, 11 January 2025
Line 192:		Line 192:
	article = self:getCanonicalName() or false --item and sitelink(item, project) or false		article = self:getCanonicalName() or false --item and sitelink(item, project) or false
	if article then		if article then
	return article		return (self:hasType("conlang") and "ling:" or "") .. article
	end		end
	-- If there's still no article, try the parent (if any).		-- If there's still no article, try the parent (if any).

Sware at 18:00, 11 January 2025

2025-01-11T18:00:26Z

← Older revision		Revision as of 18:00, 11 January 2025
Line 192:		Line 192:
	article = self:getCanonicalName() or false --item and sitelink(item, project) or false		article = self:getCanonicalName() or false --item and sitelink(item, project) or false
	if article then		if article then
	return ~~"w:" ..~~ article		return article
	end		end
	-- If there's still no article, try the parent (if any).		-- If there's still no article, try the parent (if any).

Sware at 17:59, 11 January 2025

2025-01-11T17:59:57Z

← Older revision		Revision as of 17:59, 11 January 2025
Line 190:		Line 190:
	-- Otherwise, check the Wikidata item for a sitelink.		-- Otherwise, check the Wikidata item for a sitelink.
	local item = self:getWikidataItem()		local item = self:getWikidataItem()
	article = item and sitelink(item, project~~) or self:getCanonicalName(~~) or false		article = self:getCanonicalName() or false --item and sitelink(item, project) or false
	if article then		if article then
	return "w:" .. article		return "w:" .. article

Sware at 17:59, 11 January 2025

2025-01-11T17:59:09Z

← Older revision		Revision as of 17:59, 11 January 2025
Line 190:		Line 190:
	-- Otherwise, check the Wikidata item for a sitelink.		-- Otherwise, check the Wikidata item for a sitelink.
	local item = self:getWikidataItem()		local item = self:getWikidataItem()
	article = item and sitelink(item, project) or false		article = item and sitelink(item, project) or self:getCanonicalName() or false
	if article then		if article then
	return article		return "w:" .. article
	end		end
	-- If there's still no article, try the parent (if any).		-- If there's still no article, try the parent (if any).
Line 256:		Line 256:

	local function get_commons_cat_sitelink(item)		local function get_commons_cat_sitelink(item)
	if item then		--[[if item then
	local commons_sitelink = sitelink(item, "commonswiki")		local commons_sitelink = sitelink(item, "commonswiki")
	-- Reject any sitelinks that aren't categories.		-- Reject any sitelinks that aren't categories.
	return commons_sitelink and match(commons_sitelink, "^Category:") and commons_sitelink or nil		return commons_sitelink and match(commons_sitelink, "^Category:") and commons_sitelink or nil
	end		end]]
			return nil
	end		end

Sware at 16:53, 11 January 2025

2025-01-11T16:53:26Z

← Older revision		Revision as of 16:53, 11 January 2025
Line 4:		Line 4:
	local table_module = "Module:table"		local table_module = "Module:table"

	local wikibase = mw.wikibase		--local wikibase = mw.wikibase

	local category_name_has_suffix -- defined as export.categoryNameHasSuffix below		local category_name_has_suffix -- defined as export.categoryNameHasSuffix below
	local get_entity = wikibase.getEntity		--local get_entity = wikibase.getEntity
	local get_entity_id_for_title = wikibase.getEntityIdForTitle		--local get_entity_id_for_title = wikibase.getEntityIdForTitle
	local gsub = string.gsub		local gsub = string.gsub
	local ipairs = ipairs		local ipairs = ipairs
	local match = string.match		local match = string.match
	local select = select		local select = select
	local sitelink = wikibase.sitelink		--local sitelink = wikibase.sitelink
	local type = type		local type = type
	local umatch = mw.ustring.match		local umatch = mw.ustring.match

Sware at 16:51, 11 January 2025

2025-01-11T16:51:45Z

Show changes

Sware: Created page with "local export = {} -- Implementation of getOtherNames() for languages, etymology languages, -- families and scripts. If `onlyOtherNames` is passed in, only return -- the names..."

2022-10-29T17:36:46Z

Created page with "local export = {} -- Implementation of getOtherNames() for languages, etymology languages, -- families and scripts. If `onlyOtherNames` is passed in, only return -- the names..."

New page

local export = {}

-- Implementation of getOtherNames() for languages, etymology languages,
-- families and scripts. If `onlyOtherNames` is passed in, only return
-- the names in the `otherNames` field, otherwise combine `otherNames`,
-- `aliases` and `varieties`.
function export.getOtherNames(self, onlyOtherNames)
local data
if self._extraData then
data = self._extraData
else
data = self._rawData
end
if onlyOtherNames then
return data.otherNames or {}
end
-- Combine otherNames, aliases and varieties. First try to optimize and not create any
-- new memory. This is possible if exactly one of the three exist, and if it's `varieties`,
-- there are no nested lists in `varieties`.
if data.otherNames and not data.aliases and not data.varieties then
return data.otherNames
elseif data.aliases and not data.otherNames and not data.varieties then
return data.aliases
elseif data.varieties and not data.otherNames and not data.aliases then
local saw_table = false
for _, name in ipairs(data.varieties) do
if type(name) == "table" then
saw_table = true
break
end
end
if not saw_table then
return data.varieties
end
end

-- Have to do it the "hard way".
local ret = {}
if data.otherNames then
for _, name in ipairs(data.otherNames) do
table.insert(ret, name)
end
end
if data.aliases then
for _, name in ipairs(data.aliases) do
table.insert(ret, name)
end
end
if data.varieties then
for _, name in ipairs(data.varieties) do
if type(name) == "table" then
for _, n in ipairs(name) do
table.insert(ret, n)
end
else
table.insert(ret, name)
end
end
end
return ret
end

-- Implementation of getVarieties() for languages, etymology languages,
-- families and scripts. If `flatten` is passed in, flatten down to a
-- list of stings; otherwise, keep the structure.
function export.getVarieties(self, flatten)
local data
if self._extraData then
data = self._extraData
else
data = self._rawData
end
if data.varieties then
-- If flattening not requested, just return them.
if not flatten then
return data.varieties
end
-- Check if no nested table; if so, just return the result.
local saw_table = false
for _, name in ipairs(data.varieties) do
if type(name) == "table" then
saw_table = true
break
end
end
if not saw_table then
return data.varieties
end
-- At this point, we need to flatten the varieties.
local ret = {}
for _, name in ipairs(data.varieties) do
if type(name) == "table" then
for _, n in ipairs(name) do
table.insert(ret, n)
end
else
table.insert(ret, name)
end
end
return ret
else
return {}
end
end

-- Implementation of template-callable getByCode() function for languages,
-- etymology languages, families and scripts. `item` is the language,
-- family or script in question; `args` is the arguments passed in by the
-- module invocation; `extra_processing`, if specified, is a function of
-- one argument (the requested property) and should return the value to
-- be returned to the caller, or nil if the property isn't recognized.
-- `extra_processing` is called after special-cased properties are handled
-- and before general-purpose processing code that works for all string
-- properties.
function export.templateGetByCode(item, args, extra_processing)
-- The item that the caller wanted to look up
local itemname = args[2] or error("Function to call (parameter 2) has not been specified.")
local list
if itemname == "getOtherNames" then
list = item:getOtherNames()
elseif itemname == "getOnlyOtherNames" then
list = item:getOtherNames(true)
elseif itemname == "getAliases" then
list = item:getAliases()
elseif itemname == "getVarieties" then
list = item:getVarieties(true)
end
if list then
local index = args[3]; if index == "" then index = nil end
index = tonumber(index or error("Numeric index of the desired item in the list (parameter 3) has not been specified."))
return list[index] or ""
end

if itemname == "getFamily" and item.getFamily then
return item:getFamily():getCode()
end

if extra_processing then
local retval = extra_processing(itemname)
if retval then
return retval
end
end

if item[itemname] then
local ret = item[itemname](item)

if type(ret) == "string" then
return ret
else
error("The function \"" .. itemname .. "\" did not return a string value.")
end
end

error("Requested invalid item name \"" .. itemname .. "\".")
end

return export