trayer

main :: IO ()
main = xmonad
     . ewmhFullscreen
     . ewmh
     . dynamicEasySBs barSpawner
     $ myConfig

xmobar1 = statusBarProp "xmobar -x 0 ~/.config/xmonad/.xmobarrc" (pure myXmobarPP) -- does not work with statusBarPropTo "_XMONAD_LOG_1", causes the bar to get stuck on updating...
xmobar2 = statusBarProp "xmobar -x 1 ~/.config/xmonad/.xmobarrc1" (pure myXmobarPP)

barSpawner :: ScreenId -> IO StatusBarConfig
barSpawner 0 = pure $ xmobar1 <> trayerSB
barSpawner 1 = pure $ xmobar2

myManageHook :: ManageHook
myManageHook = composeAll
    [ className =? "Gimp" --> doFloat
    , isDialog            --> doFloat
    ]

staticStatusBar cmd = pure $ def { sbStartupHook = spawnStatusBar cmd
                                 , sbCleanupHook = killStatusBar cmd
                                 }

trayerSB :: IO StatusBarConfig
trayerSB = staticStatusBar
  (unwords
    ["trayer"
    , "--edge top"
    , "--alight right"
    , "widthtype request"
    , "--expand true"
    , "--monitor primary"
    , "--transparent true"
    , "--alpha 0"
    , "-l"
    , "--tint 0x606060"
    , "--height 22"
    ]
  )