Display all node flags

This commit is contained in:
Joscha 2020-02-09 14:07:06 +00:00
parent 31e59616f5
commit 49d0c8039e
2 changed files with 12 additions and 2 deletions

View file

@ -86,6 +86,7 @@ clientAttrMap :: AttrMap
clientAttrMap = attrMap Vty.defAttr
[ ("expand", Vty.currentAttr `Vty.withStyle` Vty.bold `Vty.withForeColor` Vty.yellow)
, ("focus", Vty.currentAttr `Vty.withBackColor` Vty.blue)
, ("flags", Vty.currentAttr `Vty.withForeColor` Vty.brightBlack)
]
clientApp :: App ClientState () ResourceName