Module:Wikt-lang: Difference between revisions

Content deleted Content added
small issue still open, reverting til fix
sync from sandbox: include explicitly given script subtag in language tagging
 
(12 intermediate revisions by 7 users not shown)
Line 1:
require('Module:No globalsstrict')
local m_data = mw.loadData("Module:LanguageWikt-lang/data")
local langData = m_data.languages or m_data
 
Line 11:
return value
end
end
 
local function makeLinkedName(languageCode)
local data = langData[languageCode]
local article = data["article"]
local name = data["Wikipedia_name"] or data["name"]
return "[[" .. article .. "|" .. name .. "]]: "
end
 
Line 61 ⟶ 54:
end
end
 
p.makeEntryName = makeEntryName
 
local function fixScriptCode(firstLetter, threeLetters)
Line 68 ⟶ 59:
end
 
local function getCodes(codes, text)
local languageCode, scriptCode, invalidCode
local errorText
Line 127 ⟶ 118:
else
errorText = '<code>'..codes..'</code> is not a valid language or script code.'
end
if not scriptCode or scriptCode == "" then
scriptCode = require("Module:Unicode data").is_Latin(text) and "Latn" or "unknown"
end
if errorText then
Line 140 ⟶ 128:
end
 
local function tag(text, languageCode, script, italicsitalicize)
local data = langData[languageCode]
-- Use Wikipedia code if it has been given: for instance,
Line 146 ⟶ 134:
-- code "ine-x-proto".
languageCode = data and data.Wikipedia_code or languageCode
if word2script and word1script ~= "" then
languageCode = languageCode .. "-" .. script
local italicize = script == "Latn" and italics
end
 
if not text then text = "[text?]" end
Line 158 ⟶ 147:
local out = { textDirectionMarkers[2] }
if italicize then
table.insert(out, "<i lang=\"" .. languageCode .. "\" xml:lang=\"" .. languageCode .. "\"" .. textDirectionMarkers[1] .. ">" .. text .. "</i>")
else
table.insert(out, "<span lang=\"" .. languageCode .. "\" xml:lang=\"" .. languageCode .. "\"" .. textDirectionMarkers[1] .. ">" .. text .. "</span>")
end
table.insert(out, textDirectionMarkers[3])
return table.concat(out)
end
 
 
 
function p.lang(frame)
local parent = frame:getParent()
local args = parent.args[1] and parent.args or frame.args
local codes = args[1] and mw.text.trim(args[1])
local text = args[2] or error("Provide text in the second parameter")
local languageCode, scriptCode, errorText = getCodes(codes, text)
local italics = args.italics or args.i or args.italic
italics = not (italics == "n" or italics == "-" or italics == "no")
return tag(text, languageCode, scriptCode, italics) .. errorText
end
 
Line 197 ⟶ 169:
error("Name for the language code " .. ("%q"):format(languageCode or nil)
.. " could not be retrieved with mw.language.fetchLanguageName, "
.. "so it should be added to [[Module:LanguageWikt-lang/data]]")
end
end
Line 245 ⟶ 217:
local word2 = ifNotEmpty(args[3])
if not args[2] or '' == args[2] then
error(return '<span style="color:#d33">[text?] Parameter 2 is required")</span>';
end
local languageCode, scriptCode, errorText = getCodes(codes, word2 or word1)
local italics = args.italics or args.i or args.italic
italics = not (italics == "n" or italics == "-" or italics == "no")
local entry, linkText
Line 262 ⟶ 234:
linkText = word1
end
 
local italicize = italics and (scriptCode == "Latn" or require("Module:Unicode data").is_Latin(textlinkText)) and "Latn" or "unknown"
 
local out
if languageCode and entry and linkText then
out = tag(linkToWiktionary(entry, linkText, languageCode), languageCode, scriptCode, italicsitalicize)
elseif entry and linkText then
out = linkToWiktionary(entry, linkText)
Line 276 ⟶ 250:
else
return errorText or error("The function wiktlang generated nothing")
end
end
 
function p.wikt(frame)
local parent = frame:getParent()
local args = parent.args[1] and parent.args or frame.args
local codes = args[1] and mw.text.trim(args[1])
local word1 = ifNotEmpty(args[2])
local word2 = ifNotEmpty(args[3])
if not word1 then
error("Provide a word in parameter 2.")
end
local languageCode, scriptCode, errorText = getCodes(codes, word1)
local entry, linkText
if word2 and word1 then
entry = makeEntryName(word1, languageCode)
linkText = word2
elseif word1 then
entry = makeEntryName(word1, languageCode)
linkText = word1
end
local out
if languageCode and entry and linkText then
out = linkToWiktionary(entry, linkText, languageCode)
elseif entry and linkText then
out = linkToWiktionary(entry, linkText)
else
out = '<span style="font-size: smaller;">[text?]</span>'
end
if out and errorText then
return out and out .. errorText
else
return errorText or error("The function wikt generated nothing")
end
end