summaryrefslogtreecommitdiffhomepage
path: root/src/Parsers.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2017-12-15 03:32:27 +0100
committerjao <jao@gnu.org>2017-12-15 03:32:27 +0100
commitb89668884f021e1023160febb680a43588a6aeaa (patch)
treeec625019888664efb6c7502b754269daebab16db /src/Parsers.hs
parenta7bc612666062b5c48efae74054a453334727e91 (diff)
downloadxmobar-b89668884f021e1023160febb680a43588a6aeaa.tar.gz
xmobar-b89668884f021e1023160febb680a43588a6aeaa.tar.bz2
Configurable WM_CLASS and WM_NAME (should address #323)
Diffstat (limited to 'src/Parsers.hs')
-rw-r--r--src/Parsers.hs8
1 files changed, 6 insertions, 2 deletions
diff --git a/src/Parsers.hs b/src/Parsers.hs
index 5f5949c..bab13cb 100644
--- a/src/Parsers.hs
+++ b/src/Parsers.hs
@@ -212,7 +212,8 @@ parseConfig = runParser parseConf fields "Config" . stripComments
return (x,s)
perms = permute $ Config
- <$?> pFont <|?> pFontList <|?> pBgColor <|?> pFgColor
+ <$?> pFont <|?> pFontList <|?> pWmClass <|?> pWmName
+ <|?> pBgColor <|?> pFgColor
<|?> pPosition <|?> pTextOffset <|?> pIconOffset <|?> pBorder
<|?> pBdColor <|?> pBdWidth <|?> pAlpha <|?> pHideOnStart
<|?> pAllDesktops <|?> pOverrideRedirect <|?> pPickBroadest
@@ -220,7 +221,8 @@ parseConfig = runParser parseConf fields "Config" . stripComments
<|?> pCommands <|?> pSepChar <|?> pAlignSep <|?> pTemplate
- fields = [ "font", "additionalFonts","bgColor", "fgColor", "sepChar"
+ fields = [ "font", "additionalFonts","bgColor", "fgColor"
+ , "wmClass", "wmName", "sepChar"
, "alignSep" , "border", "borderColor" ,"template"
, "position" , "textOffset", "iconOffset"
, "allDesktops", "overrideRedirect", "pickBroadest"
@@ -230,6 +232,8 @@ parseConfig = runParser parseConf fields "Config" . stripComments
pFont = strField font "font"
pFontList = strListField additionalFonts "additionalFonts"
+ pWmClass = strField wmClass "wmclass"
+ pWmName = strField wmName "windowName"
pBgColor = strField bgColor "bgColor"
pFgColor = strField fgColor "fgColor"
pBdColor = strField borderColor "borderColor"