|
|
@ -66,7 +66,6 @@ xmobarSwitchWs wsName = xmobarAction action wsName |
|
|
|
|
|
|
|
|
|
|
|
main = do |
|
|
|
main = do |
|
|
|
xmobar_proc <- spawnPipe "xmobar" |
|
|
|
xmobar_proc <- spawnPipe "xmobar" |
|
|
|
spawn "exec ~/.xmonad/action-manager/start.sh ~/.xmonad/actiondisplay ~/.xmonad/actioncontrol --state-file ~/.xmonad/actionstate --redshift-enabled --redshift-location 51:5 --redshift-temperature 6000:2000" |
|
|
|
|
|
|
|
xmonad $ baseConfig |
|
|
|
xmonad $ baseConfig |
|
|
|
{ manageHook = (scratchpadManageHook $ W.RationalRect 0.0 0.0 1.0 0.5) <+> workspaceManageHook <+> fullscreenManageHook <+> manageDocks |
|
|
|
{ manageHook = (scratchpadManageHook $ W.RationalRect 0.0 0.0 1.0 0.5) <+> workspaceManageHook <+> fullscreenManageHook <+> manageDocks |
|
|
|
, logHook = dynamicLogWithPP xmobarPP |
|
|
|
, logHook = dynamicLogWithPP xmobarPP |
|
|
|