diff options
| author | jao <jao@gnu.org> | 2022-01-29 04:56:03 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-01-29 06:42:29 +0000 |
| commit | f42813b383f4bbc533ae7a38df1782febf5eb444 (patch) | |
| tree | fe44a4d886babb7368122fb3ad57a005847f8c41 /src/Xmobar/Config | |
| parent | 1af4da53f7f3b0bc9f0c337113a90448f035a4b1 (diff) | |
| download | xmobar-f42813b383f4bbc533ae7a38df1782febf5eb444.tar.gz xmobar-f42813b383f4bbc533ae7a38df1782febf5eb444.tar.bz2 | |
Color escape sequences for text output
Diffstat (limited to 'src/Xmobar/Config')
| -rw-r--r-- | src/Xmobar/Config/Parse.hs | 6 | ||||
| -rw-r--r-- | src/Xmobar/Config/Types.hs | 1 |
2 files changed, 5 insertions, 2 deletions
diff --git a/src/Xmobar/Config/Parse.hs b/src/Xmobar/Config/Parse.hs index e7d5933..4c43e4d 100644 --- a/src/Xmobar/Config/Parse.hs +++ b/src/Xmobar/Config/Parse.hs @@ -61,8 +61,9 @@ parseConfig defaultConfig = perms = permute $ Config <$?> pFont <|?> pFontList <|?> pWmClass <|?> pWmName - <|?> pBgColor <|?> pFgColor - <|?> pPosition <|?> pTextOutput <|?> pTextOffset <|?> pTextOffsets + <|?> pBgColor <|?> pFgColor <|?> pPosition + <|?> pTextOutput <|?> pAnsiColors + <|?> pTextOffset <|?> pTextOffsets <|?> pIconOffset <|?> pBorder <|?> pBdColor <|?> pBdWidth <|?> pAlpha <|?> pHideOnStart <|?> pAllDesktops <|?> pOverrideRedirect <|?> pPickBroadest @@ -80,6 +81,7 @@ parseConfig defaultConfig = ] pTextOutput = readField textOutput "textOutput" + pAnsiColors = readField textOutput "textAnsiColors" pFont = strField font "font" pFontList = strListField additionalFonts "additionalFonts" pWmClass = strField wmClass "wmClass" diff --git a/src/Xmobar/Config/Types.hs b/src/Xmobar/Config/Types.hs index 816edaa..6ea012f 100644 --- a/src/Xmobar/Config/Types.hs +++ b/src/Xmobar/Config/Types.hs @@ -37,6 +37,7 @@ data Config = , fgColor :: String -- ^ Default font color , position :: XPosition -- ^ Top Bottom or Static , textOutput :: Bool -- ^ Write data to stdout instead of X + , ansiColors :: Bool -- ^ Use ANSI color escapes for stdout , textOffset :: Int -- ^ Offset from top of window for text , textOffsets :: [Int] -- ^ List of offsets for additionalFonts , iconOffset :: Int -- ^ Offset from top of window for icons |