Browse Source

~/.xmonad: make windows fullscreen by default

Lucas Stadler 11 years ago
parent
commit
7842a21089
1 changed files with 7 additions and 1 deletions
  1. 7 1
      .xmonad/xmonad.hs

+ 7 - 1
.xmonad/xmonad.hs

26
(??) :: Query a -> (a -> Bool) -> Query Bool
26
(??) :: Query a -> (a -> Bool) -> Query Bool
27
(??) = flip fmap
27
(??) = flip fmap
28
28
29
myLayout = Full ||| tiled ||| Mirror tiled
30
    where tiled = Tall nmaster delta ratio
31
          nmaster = 1
32
          ratio = 1/2
33
          delta = 3/100
34
29
main = do
35
main = do
30
    xmonad $ ewmh $ pagerHints $ defaultConfig {
36
    xmonad $ ewmh $ pagerHints $ defaultConfig {
31
        modMask  = mod4Mask,
37
        modMask  = mod4Mask,
41
                        fullscreenManageHook
47
                        fullscreenManageHook
42
                     ] <+> manageHook defaultConfig,
48
                     ] <+> manageHook defaultConfig,
43
        -- Don't overwrite the section used by docks
49
        -- Don't overwrite the section used by docks
44
        layoutHook = avoidStruts $ smartBorders $ layoutHook defaultConfig,
50
        layoutHook = avoidStruts $ smartBorders $ myLayout,
45
        handleEventHook = fullscreenEventHook
51
        handleEventHook = fullscreenEventHook
46
     } `additionalKeys` ([
52
     } `additionalKeys` ([
47
        ((mod4Mask, xK_b), spawnHere "firefox"),
53
        ((mod4Mask, xK_b), spawnHere "firefox"),