From 949f117a1e67fbdf6b46a9e0ac698021bd1984f8 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Kier=C3=A1n=20Meinhardt?= <kieran.meinhardt@gmail.com>
Date: Tue, 6 Oct 2020 22:48:26 +0200
Subject: RenderTreeView: specify `color` signature

---
 src/Much/RenderTreeView.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Much')

diff --git a/src/Much/RenderTreeView.hs b/src/Much/RenderTreeView.hs
index dc4d773..6babb29 100644
--- a/src/Much/RenderTreeView.hs
+++ b/src/Much/RenderTreeView.hs
@@ -25,7 +25,7 @@ import Much.State
 import Much.TagUtils (Tag)
 import Much.TreeView
 
-color :: (t -> Identity Pm) -> t -> Blessings a -> Blessings a
+color :: (ColorConfig Identity -> Identity Pm) -> ColorConfig Identity -> Blessings String -> Blessings String
 color key config = SGR $ runIdentity $ key config
 
 -- TODO make configurable
-- 
cgit v1.2.3