[taffybar] Misc updates

This commit is contained in:
Ivan Malison 2017-03-04 03:45:10 -08:00
parent d9e0e5802a
commit b8b51f02f8
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8

View File

@ -28,6 +28,7 @@ resourcesDirectory file = ("/home" </> "imalison" </> ".lib" </> "resources" </
fallbackIcons _ klass
| isInfixOf "URxvt" klass = IIFilePath $ resourcesDirectory "urxvt.png"
| isInfixOf "Kodi" klass = IIFilePath $ resourcesDirectory "kodi.png"
| otherwise = IIColor $ (0xFF, 0xFF, 0, 0xFF)
myGetIconInfo =
@ -62,6 +63,7 @@ main = do
, updateIconsOnTitleChange = True
, updateOnWMIconChange = True
, debugMode = True
, redrawIconsOnStateChange = True
}
hudPagerConfig = hudFromPagerConfig pagerConfig
hud = taffyPagerHUDNew pagerConfig hudConfig