Adjust colors.

This commit is contained in:
Robbie Gleichman 2016-03-22 22:27:03 -07:00
parent 299886c450
commit 0c50f69619

View File

@ -61,14 +61,13 @@ colorOnBlackScheme = ColorStyle {
patternC = lightMagenta, patternC = lightMagenta,
patternTextC = cyan, patternTextC = cyan,
bindTextBoxC = reddishOrange, bindTextBoxC = reddishOrange,
bindTextBoxTextC = blueishLightCyan bindTextBoxTextC = lime
} }
where where
slightlyGreenYellow = sRGB24 212 255 0 slightlyGreenYellow = sRGB24 212 255 0
lightMagenta = sRGB24 255 94 255 lightMagenta = sRGB24 255 94 255
lightSlightlyPurpleBlue = sRGB24 67 38 255 lightSlightlyPurpleBlue = sRGB24 67 38 255
reddishOrange = sRGB24 255 119 0 reddishOrange = sRGB24 255 119 0
blueishLightCyan = sRGB24 66 198 255
whiteOnBlackScheme :: (Floating a, Ord a) => ColorStyle a whiteOnBlackScheme :: (Floating a, Ord a) => ColorStyle a
whiteOnBlackScheme = ColorStyle { whiteOnBlackScheme = ColorStyle {