https://linguifex.com/w/index.php?action=history&feed=atom&title=Module%3Afamily_tree%2Fetymology_languages 2026-04-03T22:53:39Z Revision history for this page on the wiki MediaWiki 1.43.6 https://linguifex.com/w/index.php?title=Module:family_tree/etymology_languages&diff=233363&oldid=prev 2021-08-08T17:38:03Z

<p>Created page with &quot;local language_codes = require &quot;Module:languages/code to canonical name&quot; local function determine_preferred_etymology_language_code(code1, code2) if code2:find &quot;^[%a-]+$&quot; th...&quot;</p> <p><b>New page</b></p><div>local language_codes = require &quot;Module:languages/code to canonical name&quot;<br /> <br /> local function determine_preferred_etymology_language_code(code1, code2)<br /> if code2:find &quot;^[%a-]+$&quot; then<br /> if code1:find &quot;^[%a-]+$&quot; then<br /> if not code2:find &quot;%u%l&quot; then<br /> if not code1:find &quot;%u%l&quot; then<br /> if #code2 &lt; #code1 then<br /> return code2<br /> else<br /> -- Prefer nrf-grn and nrf-jer over roa-grn and roa-jer<br /> -- (Guernsey and Jersey).<br /> local first_word1, first_word2 =<br /> code1:match &quot;^[a-z]+&quot;, code2:match &quot;^[a-z]+&quot;<br /> if first_word1 and first_word2<br /> and language_codes[first_word1] then<br /> return code1<br /> else<br /> return code2<br /> end<br /> end<br /> else<br /> return code2<br /> end<br /> else<br /> return code1<br /> end<br /> else<br /> return code2<br /> end<br /> else<br /> return code1<br /> end<br /> end<br /> <br /> local function fold(t, accum, func)<br /> for k, v in pairs(t) do<br /> accum = func(k, v, accum)<br /> end<br /> return accum<br /> end<br /> <br /> local function invert(t)<br /> local inverted = {}<br /> for k, v in pairs(t) do<br /> inverted[v] = k<br /> end<br /> return inverted<br /> end<br /> <br /> return invert(fold(<br /> require &quot;Module:etymology languages/data&quot;,<br /> {},<br /> function (code, data, data_to_code)<br /> if data_to_code[data] then<br /> local preferred_code = determine_preferred_etymology_language_code(data_to_code[data], code)<br /> data_to_code[data] = preferred_code<br /> table.insert(data.codes, code)<br /> else<br /> data_to_code[data] = code<br /> data.codes = { code }<br /> end<br /> return data_to_code<br /> end))</div>

Sware