all repos — nixfiles @ fdb0d0b207a2f769def97986055f2b26e1505ff7

System and user configuration, managed by nix and home-manager

tag-xmonad/xmonad/xmonad.hs (view raw)

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
import XMonad
import XMonad.Hooks.DynamicLog
import XMonad.Hooks.ManageDocks
import XMonad.Util.Run(spawnPipe)
import XMonad.Util.EZConfig(additionalKeys)
import System.IO

main = do
  xmproc <-spawnPipe "/usr/bin/xmobar /home/alan/.xmobarrc"
  xmonad $ defaultConfig {
    manageHook = manageDocks <+> manageHook defaultConfig,
    layoutHook = avoidStruts  $  layoutHook defaultConfig,
    logHook = dynamicLogWithPP xmobarPP {
      ppOutput = hPutStrLn xmproc,
      ppTitle  = xmobarColor "green" "" . shorten 200
    },
    terminal = "urxvt",
    modMask = mod4Mask
  }