@@ -150,19 +150,19 @@ addColor maybeColor attrs =
150150colorToCss : Error.Color -> String
151151colorToCss color =
152152 case color of
153− Error.Red -> "red"
154− Error.RED -> "red"
155− Error.Magenta -> "magenta"
156− Error.MAGENTA -> "magenta"
157− Error.Yellow -> "yellow"
158− Error.YELLOW -> "yellow"
159− Error.Green -> "green"
160− Error.GREEN -> "green"
161− Error.Cyan -> "cyan"
162− Error.CYAN -> "cyan"
163− Error.Blue -> "blue"
164− Error.BLUE -> "blue"
165− Error.White -> "white"
166− Error.WHITE -> "white"
167− Error.Black -> "black"
168− Error.BLACK -> "black"
153+ Error.Red -> "rgb(194,54,33)"
154+ Error.RED -> "rgb(252,57,31)"
155+ Error.Magenta -> "rgb(211,56,211)"
156+ Error.MAGENTA -> "rgb(249,53,248)"
157+ Error.Yellow -> "rgb(173,173,39)"
158+ Error.YELLOW -> "rgb(234,236,35)"
159+ Error.Green -> "rgb(37,188,36)"
160+ Error.GREEN -> "rgb(49,231,34)"
161+ Error.Cyan -> "rgb(51,187,200)"
162+ Error.CYAN -> "rgb(20,240,240)"
163+ Error.Blue -> "rgb(73,46,225)"
164+ Error.BLUE -> "rgb(88,51,255)"
165+ Error.White -> "rgb(203,204,205)"
166+ Error.WHITE -> "rgb(233,235,235)"
167+ Error.Black -> "rgb(0,0,0)"
168+ Error.BLACK -> "rgb(129,131,131)"