From 96b7d8b20d0d2b5e0ff37095da86b2b0e9f920e2 Mon Sep 17 00:00:00 2001 From: Brian Hicks Date: Fri, 10 Jan 2020 11:39:21 -0500 Subject: [PATCH] make blues a little nicer in bars source --- src/Image.elm | 8 +++----- 1 file changed, 3 insertions(+), 5 deletions(-) diff --git a/src/Image.elm b/src/Image.elm index 6d6b578..5c65e44 100644 --- a/src/Image.elm +++ b/src/Image.elm @@ -6,6 +6,7 @@ import Css import Grid exposing (Grid) import Html.Styled as Html exposing (Attribute, Html) import Html.Styled.Attributes as Attrs exposing (css, style) +import Palette.Tango as Tango import Set @@ -81,13 +82,10 @@ bars : Image bars = let b = - Color.fromRGBA { red = 0, green = 0, blue = 255, alpha = Color.opaque } - - w = - Color.fromRGBA { red = 200, green = 200, blue = 200, alpha = Color.opaque } + Color.fromColor Color.opaque Tango.skyBlue1 k = - Color.fromRGBA { red = 0, green = 0, blue = 0, alpha = Color.opaque } + Color.fromRGBA { red = 45, green = 45, blue = 45, alpha = Color.opaque } in case Grid.fromRowsAndColumns