From 7fc70c52f322d451e8295a12a6fbaf869a2d9a2b Mon Sep 17 00:00:00 2001 From: Akshay Nair Date: Thu, 2 Oct 2025 23:09:36 +0530 Subject: Add cmdline editor, focus switch + styling --- lib/Daffm/Attrs.hs | 22 ++++++++++++++++++---- 1 file changed, 18 insertions(+), 4 deletions(-) (limited to 'lib/Daffm/Attrs.hs') diff --git a/lib/Daffm/Attrs.hs b/lib/Daffm/Attrs.hs index 93a4163..77f9ee6 100644 --- a/lib/Daffm/Attrs.hs +++ b/lib/Daffm/Attrs.hs @@ -1,17 +1,31 @@ module Daffm.Attrs where import qualified Brick.AttrMap as A -import Brick.Util (fg) +import Brick.Util (bg, fg) +import Brick.Widgets.List (listAttr, listSelectedAttr) import qualified Brick.Widgets.List as L import qualified Graphics.Vty as V -selectedFileAttr :: A.AttrName -selectedFileAttr = A.attrName "selected-file" +fileAttr :: A.AttrName +fileAttr = listAttr <> A.attrName "file" + +fileSelectedAttr :: A.AttrName +fileSelectedAttr = listSelectedAttr <> fileAttr + +directoryAttr :: A.AttrName +directoryAttr = listAttr <> A.attrName "directory" + +directorySelectedAttr :: A.AttrName +directorySelectedAttr = listSelectedAttr <> directoryAttr appAttrMap :: A.AttrMap appAttrMap = A.attrMap V.defAttr [ (L.listAttr, fg V.white), - (selectedFileAttr, fg V.cyan) + (listSelectedAttr, bg V.black), + (directoryAttr, fg V.brightCyan), + (directorySelectedAttr, fg V.brightCyan), + (fileAttr, fg V.white), + (fileSelectedAttr, fg V.white) ] -- cgit v1.3.1