--- /dev/null
+--[[
+
+ Licensed under MIT License
+ * (c) 2013, Luca CPZ
+ * (c) 2009, Uli Schlachter
+ * (c) 2009, Majic
+
+--]]
+
+local format = string.format
+local setmetatable = setmetatable
+
+-- Lain markup util submodule
+-- lain.util.markup
+local markup = { fg = {}, bg = {} }
+
+-- Convenience tags
+function markup.bold(text) return format("<b>%s</b>", text) end
+function markup.italic(text) return format("<i>%s</i>", text) end
+function markup.strike(text) return format("<s>%s</s>", text) end
+function markup.underline(text) return format("<u>%s</u>", text) end
+function markup.monospace(text) return format("<tt>%s</tt>", text) end
+function markup.big(text) return format("<big>%s</big>", text) end
+function markup.small(text) return format("<small>%s</small>", text) end
+
+-- Set the font
+function markup.font(font, text)
+ return format("<span font='%s'>%s</span>", font, text)
+end
+
+-- Set the foreground
+function markup.fg.color(color, text)
+ return format("<span foreground='%s'>%s</span>", color, text)
+end
+
+-- Set the background
+function markup.bg.color(color, text)
+ return format("<span background='%s'>%s</span>", color, text)
+end
+
+-- Set foreground and background
+function markup.color(fg, bg, text)
+ return format("<span foreground='%s' background='%s'>%s</span>", fg, bg, text)
+end
+
+-- Set font and foreground
+function markup.fontfg(font, fg, text)
+ return format("<span font='%s' foreground='%s'>%s</span>", font, fg, text)
+end
+
+-- Set font and background
+function markup.fontbg(font, bg, text)
+ return format("<span font='%s' background='%s'>%s</span>", font, bg, text)
+end
+
+-- Set font, foreground and background
+function markup.fontcolor(font, fg, bg, text)
+ return format("<span font='%s' foreground='%s' background='%s'>%s</span>", font, fg, bg, text)
+end
+
+-- link markup.{fg,bg}(...) calls to markup.{fg,bg}.color(...)
+setmetatable(markup.fg, { __call = function(_, ...) return markup.fg.color(...) end })
+setmetatable(markup.bg, { __call = function(_, ...) return markup.bg.color(...) end })
+
+-- link markup(...) calls to markup.fg.color(...)
+return setmetatable(markup, { __call = function(_, ...) return markup.fg.color(...) end })