Module:Languages

local p = {}

local HtmlBuilder = require("Module:HtmlBuilder") local getArgs = require("Module:Arguments").getArgs local headers = mw.loadData('Module:Languages/headers')

function p.languages(frame)

   local args = getArgs(frame, {inherited = true})
   return p._languages(frame, args)

end

local function getLangText(frame, title, lang)

   title = title .. "/" .. lang
   local parsedLang = mw.language.fetchLanguageName(lang)
   local bdi = HtmlBuilder.create("bdi")
       :attr("lang", lang)
       :wikitext("", parsedLang, "")
   return frame:preprocess("")

end

function p._languages(frame, args)

   local titleObj = mw.title.getCurrentTitle()
   local title = args[1] or titleObj.nsText .. ":" .. titleObj.baseText
   local currLang = titleObj.subpageText
   if currLang == titleObj.text then
       currLang = "en"
   end
   local header = headers[currLang] or "Language:"
   local text = "English"
   local translated = false
   for lang, _ in pairs(headers) do
       local langText = getLangText(frame, title, lang)
       if langText ~= "" then
           text = text ..langText
           translated = true
       end
   end
   local nmbox = frame:expandTemplate{title = "nmbox", args = {header = header, text = text}}
   local categories = ""
   if not translated then
       categories = categories .. ""
   end
   return nmbox .. categories

end

return p