summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKierán Meinhardt <kieran.meinhardt@gmail.com>2020-10-06 22:48:26 +0200
committerKierán Meinhardt <kieran.meinhardt@gmail.com>2020-10-06 22:53:52 +0200
commit949f117a1e67fbdf6b46a9e0ac698021bd1984f8 (patch)
tree4ae47942ea64ea1683992c5d7f78d67016a630a1
parent3cf270753acc512ecf4333cbce2360a91546c5af (diff)
RenderTreeView: specify `color` signature
-rw-r--r--src/Much/RenderTreeView.hs2
1 files changed, 1 insertions, 1 deletions
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