From e7d53d6fc81fb14576fca035ab0360b44bbd6495 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Kier=C3=A1n=20Meinhardt?= <kieran.meinhardt@gmail.com>
Date: Tue, 29 Sep 2020 21:55:23 +0200
Subject: override colors and query via JSON config

---
 config/kmein.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'config')

diff --git a/config/kmein.hs b/config/kmein.hs
index 1483df2..77d14d7 100644
--- a/config/kmein.hs
+++ b/config/kmein.hs
@@ -17,6 +17,7 @@ import System.Posix.Signals
 import Text.Hyphenation
 import Text.LineBreak
 import qualified Data.Tree as Tree
+import qualified Data.Map as M
 import qualified Data.Tree.Zipper as Z
 
 {- notmuch's special tags are:
@@ -45,14 +46,14 @@ main =
         , boringMessage = SGR [38,5,3]
         , unreadMessage = SGR [38,5,11]
         , unreadSearch = SGR [38,5,15]
-        , tagMap =
+        , tagMap = M.fromList
             [ ("deleted", SGR [38,5,088])
             , ("flagged", SGR [38,5,226])
             , ("draft", SGR [38,5,63])
             , ("spam", SGR [38,5,202])
             ]
         }
-      , tagSymbols =
+      , tagSymbols = M.fromList
           [ ("flagged", "🔖")
           , ("attachment", "📎")
           , ("signed", "🔒")
-- 
cgit v1.2.3