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
   if not mw.title.new(title).exists then
       return ""
   end
   local parsedLang = frame:callParserFunction("#language", lang)
   local bdi = HtmlBuilder.create("bdi")
       :attr("lang", lang)
       :wikitext("", parsedLang, "")
   return " • " + bdi

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"
   for lang, _ in pairs(headers) do
       text = text .. getLangText(frame, title, lang)
   end
   return frame:expandTemplate{title = "nmbox", args = {header = header, text = text}}

end

return p