2 Commits

View File

@ -289,11 +289,11 @@ main = do sc <- IS.countScreens
dzenSodiumBar <- spawnPipe (getSodiumBar sc) dzenSodiumBar <- spawnPipe (getSodiumBar sc)
dzenTennessineBar <- spawnPipe (getTennessineBar sc) dzenTennessineBar <- spawnPipe (getTennessineBar sc)
dzenBlancherBar <- spawnPipe (getBlancherBar sc) dzenBlancherBar <- spawnPipe (getBlancherBar sc)
xmonad $ docks $ ewmh $ desktopConfig { xmonad $ desktopConfig {
workspaces = ["shell","qb","pindrop","kofc","VM"] workspaces = ["shell","qb","pindrop","VM"]
, terminal = myTerminal , terminal = myTerminal
, focusFollowsMouse = True , focusFollowsMouse = True
, manageHook = manageDocks <+> myManageHook <+> manageHook desktopConfig , manageHook = manageDocks <+> myManageHook -- <+> manageHook desktopConfig
, handleEventHook = handleEventHook desktopConfig , handleEventHook = handleEventHook desktopConfig
, layoutHook = avoidStruts $ gaps [(D,108)] $ layoutH , layoutHook = avoidStruts $ gaps [(D,108)] $ layoutH
, logHook = myLogHook dzenTopBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0) , logHook = myLogHook dzenTopBar >> fadeHook >> updatePointer (0.5, 0.5) (0, 0)