diff options
| author | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-28 09:06:09 +0200 |
|---|---|---|
| committer | Don Stewart <dons@cse.unsw.edu.au> | 2007-05-28 09:06:09 +0200 |
| commit | 898081496fed045e676a7f1b2d2fc0d3175ba293 (patch) | |
| tree | 4a0dd254141e3e3cc985185a0afbdb664d6e9ed8 | |
| parent | c0658d1302223096cb15bf1017c374537dc8a46f (diff) | |
| download | xmonad-898081496fed045e676a7f1b2d2fc0d3175ba293.tar.gz xmonad-898081496fed045e676a7f1b2d2fc0d3175ba293.tar.xz xmonad-898081496fed045e676a7f1b2d2fc0d3175ba293.zip | |
ensure !! won't go out of bounds in modifyGap
darcs-hash:20070528070609-9c5c1-2f1c968174a8e53b4f37e62e6fd22a70f7ecf3b0.gz
| -rw-r--r-- | Config.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -120,7 +120,7 @@ keys = M.fromList $ , ((modMask , xK_period), sendMessage (IncMasterN (-1))) -- @@ Deincrement the number of windows in the master area -- toggle the status bar gap - , ((modMask , xK_b ), modifyGap (\i n -> let x = defaultGaps !! i in if n == x then (0,0,0,0) else x)) -- @@ Toggle the status bar gap + , ((modMask , xK_b ), modifyGap (\i n -> let x = (defaultGaps ++ repeat (0,0,0,0)) !! i in if n == x then (0,0,0,0) else x)) -- @@ Toggle the status bar gap -- quit, or restart , ((modMask .|. shiftMask, xK_q ), io (exitWith ExitSuccess)) -- @@ Quit xmonad |