summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@shackspace.de>2014-12-31 12:54:11 +0100
committertv <tv@shackspace.de>2014-12-31 12:54:11 +0100
commit4b545f878a9e9c372a7749c16c2bd5a3245eae58 (patch)
treeeff97a0fddf5fbb5cca5c605f333e84c71d81050
parent51a9cbe24f0f18534109f35685c803422e3379b1 (diff)
"*" toggles "star" tag
-rw-r--r--TreeViewRaw.hs3
-rw-r--r--test5.hs1
2 files changed, 4 insertions, 0 deletions
diff --git a/TreeViewRaw.hs b/TreeViewRaw.hs
index 72e2ba3..ef135de 100644
--- a/TreeViewRaw.hs
+++ b/TreeViewRaw.hs
@@ -57,6 +57,7 @@ searchSGR
, unreadMessageSGR
, unreadSearchSGR
, killedTagSGR
+ , starTagSGR
:: Trammel String -> Trammel String
searchSGR = SGR [38,5,162]
focusSGR = SGR [38,5,160]
@@ -64,6 +65,7 @@ boringSGR = SGR [38,5,240]
dateSGR = SGR [38,5,071]
tagsSGR = SGR [38,5,036]
killedTagSGR = SGR [38,5,088]
+starTagSGR = SGR [38,5,226]
unreadMessageSGR = SGR [38,5,117]
unreadSearchSGR = SGR [38,5,250]
@@ -142,6 +144,7 @@ renderTags =
renderTag :: Tag -> Trammel String
renderTag tag = case tag of
"killed" -> killedTagSGR plain
+ "star" -> starTagSGR plain
_ -> plain
where
plain = Plain $ T.unpack tag
diff --git a/test5.hs b/test5.hs
index 20d97fb..c6142c4 100644
--- a/test5.hs
+++ b/test5.hs
@@ -215,6 +215,7 @@ keymap :: String -> State -> IO State
keymap "a" = toggleTagAtCursor "inbox"
keymap "s" = toggleTagAtCursor "unread"
keymap "&" = toggleTagAtCursor "killed"
+keymap "*" = toggleTagAtCursor "star"
keymap "r" = replyToAll
keymap "e" = viewSource
keymap "t" = editTags