From 63bf1907d3e6629ac21da87b9e45303bcec2bdf9 Mon Sep 17 00:00:00 2001 From: tv Date: Wed, 30 Sep 2020 11:45:41 +0200 Subject: render non-text parts --- src/Much/State.hs | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/Much/State.hs') diff --git a/src/Much/State.hs b/src/Much/State.hs index b7b01e6..8bc2de9 100644 --- a/src/Much/State.hs +++ b/src/Much/State.hs @@ -49,6 +49,8 @@ data ColorConfig a = ColorConfig , unreadMessage :: a , boringMessage :: a , tagMap :: M.Map T.Text a + , unprintableFocus :: a + , unprintableNormal :: a } deriving (Generic, Show) instance FromJSON a => FromJSON (ColorConfig a) -- cgit v1.2.3