diff options
| author | jao <jao@gnu.org> | 2017-12-15 03:32:27 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2017-12-15 03:32:27 +0100 |
| commit | b89668884f021e1023160febb680a43588a6aeaa (patch) | |
| tree | ec625019888664efb6c7502b754269daebab16db /src/Window.hs | |
| parent | a7bc612666062b5c48efae74054a453334727e91 (diff) | |
| download | xmobar-b89668884f021e1023160febb680a43588a6aeaa.tar.gz xmobar-b89668884f021e1023160febb680a43588a6aeaa.tar.bz2 | |
Configurable WM_CLASS and WM_NAME (should address #323)
Diffstat (limited to 'src/Window.hs')
| -rw-r--r-- | src/Window.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Window.hs b/src/Window.hs index 11ea82e..d2506db 100644 --- a/src/Window.hs +++ b/src/Window.hs @@ -100,8 +100,8 @@ setProperties c d w = do card <- mkatom "CARDINAL" atom <- mkatom "ATOM" - setTextProperty d w "xmobar" wM_CLASS - setTextProperty d w "xmobar" wM_NAME + setTextProperty d w (wmClass c) wM_CLASS + setTextProperty d w (wmName c) wM_NAME wtype <- mkatom "_NET_WM_WINDOW_TYPE" dock <- mkatom "_NET_WM_WINDOW_TYPE_DOCK" |