------------------------------------------------------------------------------------------

implements 

Module entry point from another module




local function _in_lang (args)
	local synonym_table = mw.loadData ('Module:Lang/ISO 639 synonyms');			-- ISO 639-2/639-2T code translation to 639-1 code
	local list_cats = 'yes' == args['list-cats'];								-- make a boolean
	local list = {};
	local cats = {};
	local maint_msgs = {};
	
	if not args[1] then
		local template = (args['template'] and table.concat ({': '})) or '';	-- make template name (if provided by the template)
		return table.concat ({''});
	end

	local module = 'Module:Lang' .. (mw.getCurrentFrame:getTitle:match ('/sandbox') or '');	-- if this module is the sandbox,

	local name_from_tag = require (module)._name_from_tag;						-- use Module:Lang/sandbox; Module:Lang else

	local namespace = mw.title.getCurrentTitle.namespace;						-- used for categorization
	local this_wiki_lang = mw.language.getContentLanguage.code;				-- get this wiki's language code

	for i, lang in ipairs (args) do
		local code = args[i]:lower;
		local t = {code, ['link'] = args['link'], ['template'] = args['template']};	-- build an 'args' table
		lang = name_from_tag (t)												-- get the language name

		table.insert 												-- add this language or error message to the list

		if not [code] then	-- except for these exact IETF tags; TODO: a better way/place to do this?
			code = code:match ('^%a%a%a?%f[^%a]');								-- strip off region, script, and variant tags so that they aren't used to make category names
		end
		if synonym_table[code] then												-- if 639-2/639-2T code has a 639-1 synonym
			if (0 == namespace) and not list_cats then							-- when listing cats don't include this cat; TODO: right choice?
				table.insert (cats, table.concat );
			end
			table.insert ;
			code = synonym_table[code];											-- use the synonym
		end

		if (0 == namespace) or list_cats then									-- when in article space
			if lang:find ('[Ee]rror') then										-- add error category (message provided by Module:Lang)
				if not list_cats then											-- don't include this cat when listing cats; TODO: right choice?
					table.insert ;
				end
			elseif this_wiki_lang ~= code then									-- categorize article only when code is not this wiki's language code
				if lang:match ('%[%[.-|.-%]%]') then							-- wikilinked individual language name
					lang = lang:match ('%[%[.-|(.-)%]%]');
				elseif lang:match ('%[%[.-%]%]') then							-- wikilinked collective languages name
					lang = lang:match ('%[%[(.-)%]%]');
				end																-- neither of these then plain-text language name

				if lang:find ('languages') then									-- add appropriate language-name category
					table.insert (cats, table.concat ({'Category:Articles with sources in ', lang, ' '}));
				else
					table.insert (cats, table.concat ({'Category:Articles with ', lang, '-language sources '}));
				end
			end
		end
	end
	
	if list_cats then
		local cats = table.concat :gsub ;				-- make a string of categories and then strip wikilink markup
		return cats
	end

	local result = {'');											-- add closing ) and closing span
	table.insert (result, table.concat (maint_msgs) or '');				-- add maint messages, if any
	table.insert (result, table.concat (cats));									-- add categories
	return table.concat (result);												-- make a big string and done
end

--------------------------------------------------------------------------------------------

implements 

Module entry point from an 


local function in_lang (frame)
	local args = require ('Module:Arguments').getArgs (frame);
	return _in_lang (args);
	end

----------------------------------------------------------------------

return {
	in_lang = in_lang,															-- module entry from 

	_in_lang = _in_lang,														-- module entry from another module