From 71d4a7236175764bb262f6cce728b32c4f59ad8a Mon Sep 17 00:00:00 2001
From: Kim Alvefur <zash@zash.se>
Date: Sat, 27 Feb 2016 16:56:34 +0100
Subject: util.termcolours: Add some CSS color names

---
 util/termcolours.lua | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'util')

diff --git a/util/termcolours.lua b/util/termcolours.lua
index 5d06fd35..a0fee7ce 100644
--- a/util/termcolours.lua
+++ b/util/termcolours.lua
@@ -80,6 +80,18 @@ setmetatable(stylemap, { __index = function(_, style)
 	return g .. color(hex2rgb(style));
 end } );
 
+local csscolors = {
+	red = "ff0000"; fuchsia = "ff00ff"; green = "008000"; white = "ffffff";
+	lime = "00ff00"; yellow = "ffff00"; purple = "800080"; blue = "0000ff";
+	aqua = "00ffff"; olive  = "808000"; black  = "000000"; navy = "000080";
+	teal = "008080"; silver = "c0c0c0"; maroon = "800000"; gray = "808080";
+}
+for color, rgb in pairs(csscolors) do
+	stylemap[color] = stylemap[color] or stylemap[rgb];
+	color, rgb = color .. " background", rgb .. " background"
+	stylemap[color] = stylemap[color] or stylemap[rgb];
+end
+
 local function getstyle(...)
 	local styles, result = { ... }, {};
 	for i, style in ipairs(styles) do
-- 
cgit v1.2.3