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 } )