Module:Native name/sandbox: Difference between revisions

Revision as of 06:11, 9 November 2022

Latest revision as of 02:01, 13 April 2023

(6 intermediate revisions by 3 users not shown)

Line 68:

args_t.fontsize - deprecated alias of |parensize=

args_t.nolink - any value inhibits wikilinking of language name

args_t.suppress_empty_list_error - when set to 'yes', suppresses an 'empty' error message; mostly for use within another template

this function calls these functions in Module:lang:

Line 85 ⟶ 87:

local template = (args_t.template and args_t.template) or 'native name'; -- for error messaging; use 'native name list' when called from native_name_list(), etc

if not (args_t[1] or args_t[2]) and yes_no (args_t.suppress_empty_list_error) then

return ''; -- if empty list error is suppressed, return empty string

ifelseif not args_t[21] then

return error_msg ((args_t.index and messages_t.tag_required_idx) or messages_t.tag_required, template, args_t.index)

elseif not args_t[2] then

end

if not args_t[2] then

return error_msg ((args_t.index and messages_t.name_required_idx) or messages_t.name_required, template, args_t.index)

end

Line 115 ⟶ 118:

if args_t.nolink then

table.insert (out_t, table.concat ({'(', lang_module._name_from_tag ({args_t[1], ['template']=template}), ')'}));

ifelseif lang_module._is_ietf_tag (args_t[1]) then

table.insert (out_t, table.concat ({'(', lang_module._name_from_tag ({args_t[1], ['link'] ='yes', ['template']=template}), ')'}));

else

table.insert (out_t, '(language?)'); -- TODO: any reason to keep this?

if lang_module._is_ietf_tag (args_t[1]) then

table.insert (out_t, table.concat ({'(', lang_module._name_from_tag ({args_t[1], ['link'] ='yes', ['template']=template}), ')'}));

else

table.insert (out_t, '(language?)'); -- TODO: any reason to keep this?

end

end

Line 160 ⟶ 161:

also supports:

args_t.postfixn - wikitext to be appended to list item n (references other appropriate text)

args_t.suppress_empty_list_error - when set to 'yes', suppresses an 'empty list' error message; mostly for use within another template

]]

Line 168 ⟶ 170:

end

local unsorted_enumerators_t = {} -- unsorted k/v table of tagn and namen enumerators where k is the enumerator and v is always true

local active_param = {} -- Set of active parameters

for param, _ in pairs (args_t) do -- loop through all parameters

local enumerator = mw.ustring.match (param, "^tag(%d+)$") -- is this a |tagn= parameter? extract enumerator if present

-- loop through all parameters

if enumerator then -- if there is an enumerator

local tag_match = mw.ustring.match(param, "^tag(%d+)$") -- check for numbered tag

unsorted_enumerators_t[tonumber(enumerator)] = true -- add enumerator to the table

if tag_match then

active_param[tonumber(tag_match)] = true -- if there, add number to active parameter set

else

local name_match = mw.ustring.match (param, "^name(%d+)$") -- is this a |tagn= parameter? extract enumerator if -- else check for numbered namepresent

if name_match then -- if there is an enumerator

active_paramunsorted_enumerators_t[tonumber (name_match)] = true -- if there, add numberenumerator to active parameterthe settable

end

end

end

local enumerators_t = {} -- will hold a sorted sequence of enumerators

local param_list = {} -- created sorted list of numbered parameters

for n, _ in pairs (active_paramunsorted_enumerators_t) do -- loop through the k/v table of enumerators

table.insert (param_listenumerators_t, n) -- add the enumerator to the sequence

end

table.sort (param_listenumerators_t) -- and ascending sort

local list_t = {}; -- list of formatted native names goes here

for _, n in ipairs (param_listenumerators_t) do -- loop through numbered parameters,the insorted orderenumerators

table.insert (list_t, table.concat ({

'<li>', -- open the list item

_native_name ({ -- go render the native name

args_t['tag'..n],

Line 206:

['template'] = 'native name list', -- for error messaging

['index'] = n, -- for error messaging

}),

args_t['postfix'..n] or '',

'</li>' -- close the list item

}));

end

if 0 <== #list_t then

return (yes_no (args_t.suppress_empty_list_error) and '') or -- return empty string when error suppressed

if 1 < #list_t then

return error_msg (messages_t.empty_list, 'native name list'); -- default return empty listotherwise error

table.insert (list_t, 1, '<div class="plainlist"><ul>'); -- open the div; open the unordered list

if elseif 1 <== #list_t then

table.insert (list_t, '</ul></div>'); -- close the unordered list; close the div

else return list_t[1]; -- herereturn whenthe onlyvery oneshort list item; no need for list markup; TODO: add error message for this case?

local out = table.concat (list_t):gsub ('<li>', ''):gsub ('</li>', '');

return out; -- to avoid replacement count contaminating the output

end

elseif args_t['empty_list_error'] == nil

or yes_no(args_t['empty_list_error']) then

return error_msg (messages_t.empty_list, 'native name list'); -- default return empty list error

else

return require ('Module:List').unbulleted (list_t); -- use unbulleted list from module

return '' -- if empty_list_error is explicitly "no", return blank

end

return table.concat (list_t); -- make a big string and done

end

Line 277 ⟶ 268:

return table.concat ({value, error_msg (messages_t.malformed_param, 'native name checker')}, ' '); -- no {{lang}} or {{native_name}} template

end

if 1 < count then

ifand not (value:find ('<div class="plainlist *" *>') or not value:find ('</div>$') then -- must be wrapped in 'plainlist' div

and value:find ('</div>$'))
then
return table.concat ({value, error_msg (messages_t.list_markup, 'native name checker')}, ' ');

end

end