From 7c0a10672f5715508d8ec96e4aa5e091a7a83409 Mon Sep 17 00:00:00 2001 From: Jonathan Lamothe Date: Fri, 2 Aug 2024 00:24:42 -0400 Subject: [PATCH] make check bits yellow --- src/Hamming/App.hs | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/src/Hamming/App.hs b/src/Hamming/App.hs index 6e12282..d2e9cfd 100644 --- a/src/Hamming/App.hs +++ b/src/Hamming/App.hs @@ -30,7 +30,7 @@ import Brick.AttrMap (attrMap) import Brick.Main (App (..), showFirstCursor) import Brick.Util (fg, style) import Graphics.Vty.Attributes (Attr (..), MaybeDefault (..), bold) -import Graphics.Vty.Attributes.Color (green, red) +import Graphics.Vty.Attributes.Color (green, red, yellow) import Hamming.App.Draw import Hamming.App.Events @@ -44,9 +44,11 @@ mainApp = App , appHandleEvent = eventHandler , appStartEvent = return () , appAttrMap = const $ attrMap (style 0) - [ ( marginAttr, fg green ) - , ( checkAttr, style bold ) - , ( zeroAttr, fg red ) + [ ( marginAttr, fg green ) + , ( checkAttr + , (style bold) { attrForeColor = SetTo yellow } + ) + , ( zeroAttr, fg red ) , ( validAttr , (style bold) { attrForeColor = SetTo green } )