Module:Book appearances

Documentation for this module may be created at Module:Book appearances/doc

-- local string = require("Module:String")

local p = {}

local abbrs = {
	["TDP"] = "The Dragonet Prophecy",
	["TLH"] = "The Lost Heir",
	["THK"] = "The Hidden Kingdom",
	["TDS"] = "The Dark Secret",
	["TBN"] = "The Brightest Night",
	["MR"] = "Moon Rising",
	["WT"] = "Winter Turning",
	["EP"] = "Escaping Peril",
	["TOP"] = "Talons of Power",
	["DOD"] = "Darkness of Dragons",
	["TLC"] = "The Lost Continent",
	["THQ"] = "The Hive Queen",
	["TPJ"] = "The Poison Jungle",
	["TDG"] = "The Dangerous Gift",
	["TFOH"] = "The Flames of Hope",
	["L1"] = "Darkstalker",
	["L2"] = "Dragonslayer",
	["DS"] = "DS is ambiguous and could refer to Darkstalker (use L1) or Dragonslayer (use L2).",
	["W:P"] = "Prisoners",
	["W:A"] = "Assassin",
	["W:D"] = "Deserter",
	["W:R"] = "Runaway",
	["AGTTDW"] = "A Guide to the Dragon World"
}

-- str: String to parse
-- delim: String to use to join the book names (default '\n')
function p._appearancesList(str, fmt, delim)
	if not str or str == "" then 
		return ""
	end
	fmt = fmt or '%s'
	delim = delim or '\n'
	local names = mw.text.split(str, ' ', true)
	-- iterate over substrings
	for i, v in ipairs(names) do
		if str == "" then
			-- do notning
		else
			local full = abbrs[v]
			if full then
				names[i] = string.format(fmt, full)
			else
				return '{{error|Unrecognized abbreviation <code>' .. v .. '</code>}}'
			end
		end
	end
	return table.concat(names, delim)
end

-- wrapper for _appearancesList, untested
function p.appearancesList(frame)
	local args = frame.args
	local str = args.str or args[1]
	local fmt = args.fmt or args[2] or "''[[%s]]''"
	local delim = args.delim or args[3] or '<br>'
	return frame:preprocess(p._appearancesList(str, fmt, delim))
end

return p